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PROF. R. SABBATINI 


INTRODUÇÃO A PROGRAMAÇÃO BASIC 
PARA MICROCOMPUTADORES 


E UR DO 


T U L (9) 


QUE É UM 
t: COMPUTADOR? 


Desde épocas imemoriais, o ho- 
mem tem inventado ferramentas e 
instrumentos para ajudá-lo a fazer 
milhares de coisas diferentes. Pode- 
mos imaginar a ferramenta como 
uma espécie de extensão dos senti- 
dos e dos músculos do ser humano. 
O que é um telescópio, por exemplo? 
Nada mais do que a ampliação do 
sentido da visão. Sem instrumentos e 
ferramentas, certamente o homem 
não teria atingido o grau de civiliza- 
ção que tem hoje, nem progrediria 
tão depressa. 

Também o computador pode ser 
visto como uma espécie de ferramen- 
ta que o homem inventou para o aju- 
dar, ampliando os poderes de seu 


próprio cérebro. É usando o seu cére- 
bro que o homem é capaz de resol- 
ver problemas, decidir coisas e me- 
morizar informações. Com a ajuda 
do computador, entretanto, ele pode 
fazer cálculos complicadíssimos mui- 
to mais rapidamente do que com ou- 
tros meios. . 

O computador também tem MEMO- 
RIA, ou seja, ele é capaz de guardar 
as informações e reutilizá-las. Essas 
informações, que são chamadas de 
DADOS, devem ser colocadas por 
um ser humano na memória do com- 
putador. 

Muitas vezes, os computadores são 
capazes de memorizar coisas que os 
homens não conseguem: listas lon- 
gas de nomes e de números, por 
exemplo. 

Um computador é capaz de achar 
rapidamente qualquer informação 
guardada em sua memória. Ele pode 
também comparar dados entre si, pa- 
ra mostrar, por exemplo, qual é o 
maior ou o menor. 

Tudo isso faz do computador uma 


ferramenta extremamente poderosa, 
um auxiliar indispensável do homem 
moderno, em um número enorme de 
atividades, nos bancos, nas empre- 
sas fornecedoras de energia, nas tele- 
comunicações, nas escolas etc 


Entretanto, mesmo sendo tão pode- 
roso, o computador é uma máquina 
relativamente primitiva, quando com- 
parada com o cérebro humano. O 


computador não tem sentimentos, 
nem iniciativa própria. Ele só faz o 
que um ser humano mandar: essa 
pessoa é chamada PROGRAMA- 
DOR, e sua função é colocar no com- 
putador uma série de comandos ou 
instruções, que dizem exatamente o 


que a máquina deverá realizar. Esta 
série de ordens é chamada de PRO- 
GRAMA e, sem este, nenhum compu- 
tador funciona. 


computador 
é uma ferramenta 
universal 


DO 


A grande vantagem do computa- 
dor sobre os outros instrumentos é 
que, com um só aparelho, podemos 
fazer muitas coisas diferentes. Para is- 
so, basta colocar um outro programa 
em sua memória, e ele lhe obedece- 
rá. Por isso, dizemos que o computa- 
dor é uma ferramenta universal. Hoje 
em dia, com os robôs (que são compu- 
tadores dotados de força e movimen- 
to), o número de coisas que se pode fa- 
zer é maior ainda. Portanto, sabendo 
programar um computador, você po- 
derá dominá-lo completamente. 


a 

MM importante 
aprender 
programação? 


E maia 

Em muitas profissões, o computa- 
dor é uma ferramenta de trabalho 
muito importante e necessária. 
Quem quiser estudar para engenhei- 
ro civil, por exemplo, e não souber 
computação, vai ser incapaz de cons- 
truir prédios grandes, estradas e tú- 
neis. Outras profissões, que ainda 
não usam muito o computador, usa- 
rão cada vez mais no futuro. Exem- 
plos: Medicina, Biologia, Educação, 
Direito, etc. Por isso é importante que 
todos aprendam alguma coisa sobre 
os computadores. . 

É claro que nem todas as pessoas 
que usam computadores precisam sa- 
ber programá-los. Pode-se comprar 
um programa pronto, e bastará colo- 
cá-lo no computador e utilizá-lo devi- 
damente. Entretanto, só se consegui- 
rá dominar completamente o compu- 
tador se se souber programá-lo. Mui- 
tas vezes, não se achará um progra- 
ma feito por outros que realize exata- 
mente o que se quer. E, além disso, 
como se sabe, a programação de 
computadores é uma profissão cada 
vez mais valorizada e atraente. 

Até há quatro ou cinco anos a 
maioria das pessoas não tinha a me- 
nor chance de utilizar diretamente 
um computador no seu dia-a-dia. En- 
tretanto, com o progresso maravilho- 
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so da eletrônica, surgiram computa- 
dores cada vez menores e mais bara- 
tos, que hoje estão ao alcance de to- 
dos. Esses novos computadores, cha- 
mados de microcomputadores, estão 
entrando em todos os ramos da ativi- 
dade humana, e em breve serão tão 
comuns quanto os telefones e os auto- 
móveis. Devemos nos preparar para 
esse futuro! 


A mo É UM 


COMPUTADOR? 


Para entender como é organizado 
um computador, temos antes que 
examinar a maneira como ele é utili- 
zado. 

Podemos imaginar o computador 
como uma espécie de calculadora. 
Para efetuar um cálculo por meio de- 
la, precisamos primeiro fornecer-lhe 
os valores que serão utilizados nas 
contas. Isso é feito pelas teclas, que 
também são usadas para informar & 
calculadora quais serão as operações 
a realizar (soma, divisão etc.). Uma 
vez fornecidos os dados -e as opera- 
ções, a calculadora efetua os cálculos 
e mostra os resultados no visor. 

A forma de utilizar um computador 
não é muito diferente desta. Ele é for- 
mado por diversos elementos, cada 
um encarregado de uma função es- 
pecífica. 


TECLADO UCP 


ENTRADA: é a parte do computador 
que recebe os DADOS (números, le- 
tras) e o PROGRAMA (ordens e ope- 
rações). 


PROCESSADOR: é o elemento do com- 
putador que mostra os resultados. 

Um computador pode ter diferentes 
tipos de entradas e saídas, ao contrá- 
rio das calculadoras mais simples. 
Na maioria dos computadores peque- 
nos (chamados de microcomputado- 
res) estas são as partes responsáveis 
pelas três tarefas: 


1) O TECLADO — parecido com o de 
uma máquina de escrever, é usado 


para informar ao computador os da- 
dos e as instruções ou comandos. Por- 
tanto, ele é o elemento de ENTRADA 
do computador. 


2) A UNIDADE CENTRAL DE PRO- 
CESSAMENTO — esse é o nome da 
calculadora que o computador tem 
em seu interior. Na maioria dos mi- 


crocomputadores, essa unidade está 
localizada na mesma caixa do tecla- 
do, e é formada por milhares de cir- 
cuitos eletrônicos de tamanho micros- 
cópico. Essa parte é o PROCESSA- 
DOR do microcomputador, e é tam- 


bém 
(UCP). 


conhecida pela abreviatura 


3) A TELA DE VÍDEO — a informação 
que for digitada (datilografada) no te- 
clado aparece ao mesmo tempo na 
tela de uma TV, ligada ao computa- 
dor: desse modo, pode-se ver o que 
se está fazendo. Quando o resultado 
estiver pronto, o computador tam- 
bém vai escrevê-lo na tela. Portanto, 
ela é o elemento de SAÍDA do nosso 
computador. 

Outra parte importante do compu- 
tador é a MEMÓRIA, da qual já fala- 
mos acima. A memória do computa- 
dor é capaz de guardar ao mesmo 
tempo um certo número de informa- 
ções. Por exemplo, muitos microcom- 
putadores podem guardar até 48 000 
números ou letras em sua memória. 
Por isso se diz que eles têm uma me- 
mória de 48 K (o K significa quilo, ou 
1000 vezes: portanto, 


48 x 1000 = 48 000). 


Não se vê a memória, a não ser 
que se abra a caixa do teclado. Esta 
é formada por milhares de circuitos 
microscópicos, do mesmo tipo que os 
do processador. 


que é um 


programa de 
computador? 


A 


Os computadores recebem ordens 
em uma linguagem própria, diferen- 
te da nossa. Assim, você terá que 
aprendê-la, para conseguir se comu- 
nicar com ele. 

A linguagem que a maioria dos mi- 
crocomputadores é capaz de enten- 
der chama-se BASIC, Ela foi inventa- 
da nos Estados Unidos há cerca de 
vinte anos. Por isso, cada ordem ou 
comando na linguagem BASIC é 
uma palavra em inglês. Entretanto, o 
número desses comandos é peque- 
no, o que torna fácil decorá-los. Com 
algumas aulas, você já saberá usá- 
los como se fossem sua própria lin- 
guagem. Aprender BASIC é muito 
mais fácil que aprender qualquer 
idioma estrangeiro. 

* Eis um exemplo de comando sim- 
ples em BASIC: 


PRINT8+3 


Esta ordem ou comando do progra- 
ma tem o seguinte significado para o 
computador: 


ESCREVA O RESULTADO 
DA CONTA 8 + 3 


A palavra print quer dizer, “escre- 
va”, em inglês. 

Normalmente um programa é 
constituído de uma série de instru- 
ções ou comandos dados ao computa- 
dor. Ele realiza um de cada vez, na 
ordem em que eles forem fornecidos. 

Todo programa digitado no teclado 
do computador é, primeiramente, 
guardado em sua memória. Assim 
ele pode se lembrar do programa, e 
repeti-lo para nós, tantas vezes quan- 
tas quisermos. Essa é sua grande dife- 
rença em relação às calculadoras. 

Infelizmente, a memória do compu- 
tador se apaga ao desligarmos a for- 
ça, Todas as informações guardadas 
se perdem, inclusive o programa. 

Por esse motivo, seria bom ter uma 
maneira de guardar o programa em 
outro lugar, para que não se perca 
ao desligarmos o computador. Assim 
não será necessário digitar de novo 
todo o programa, ao ligarmos o com- 
putador. 

Os microcomputadores têm uma 
maneira muito simples de guardar es- 
ses programas: um gravador cassete 
comum. Através de um fio que liga o 
computador ao gravador, todas as 
instruções de um programa podem 


TESTE 


1.1. Marque V se for verdadeiro, ou 
F se for falso: 


() O computador é capaz de pen- 
sar sozinho. 

() O computador fica chateado se 
errar algum cálculo. 

() O computador não erra quando 
realiza algum cálculo. 

() O computador não tem memória. 

() O computador faz contas mais 
rapidamente que o homem. 

() O computador pode fazer coi- 
sas sem ser programado pelo 
homem. 


1.2. Defina com suas próprias pa- 
lavras: 


PROGRAMA: 
DADOS: 


1.3. Diga se concorda ou não com a 
seguinte afirmação, e por quê: 


UM DIA OS COMPUTADORES 
VÃO MANDAR NA HUMANIDADE 


1.4, Cite três trabalhos que o ho- 
mem faz com auxílio dos computa- 
dores: 


3- 


1.5. Escreva, na figura abaixo, os 
or q das partes do microcompu- 
tador: 


1,6. Uma calculadora eletrônica co- 
mum é uma espécie de computador 


simplificado. Escreva na figura abai- 
xo quais são os elementos de EN- 
A e de A da calculadora. 


1,7. Qual a diferença entre o tecla- 
do de um computador e o de uma 
calculadora? 


1.8. Escreva para que serve cada 
parte do computador: 


TECLADO: 

TELA DE VÍDEO: 

UNIDADE DE PROCESSAMENTO: 
MEMÓRIA: 


1.9. O que é memória auxiliar, e 


qual é o tipo de memória auxiliar 
que os microcomputadores mais co- 
muns utilizam? 


1.10. Marque V se for verdadeiro, F 
se for falso: 


() BASIC é uma linguagem de 
computador. 

() Um idioma estrangeiro é mai: 
simples do que o BASIC. ; 

() O BASIC é uma linguagem in- 
ventada pelo homem. 

() Um computador só pode ser 
programado na sua própria lin- 
ne 

() Um programa é um conjunto de 
instruções ao computador. 

() O programa de computador pre- 
cisa ser guardado na memória, | 

() Existe uma e da memória 
do comput que não pode 
ser apagada. 


1.11, Explique o que significam pa- 
ra o computad: 


or os seguintes co- 
mandos em BASIC: 


PRINT 12 — 45 
PRINT 29 + 3 — 8 


1,12, Por o microcomputador en- 
tende BASIC logo que você o liga? 


ser gravadas em uma fita cassete, 
quando você quiser. 

O computador grava essas informa- 
ções usando uma espécie de código 
Morse de alta velocidade. Quando 


COMO ESTUDAR BASIC 


O objetivo deste curso é ensinar 
você a programar microcomputado- 
res usando a linguagem BASIC. Pra- 
ticamente todos os microcomputado- 
res hoje existentes são capazes de 
entender essa linguagem: assim, o 
que você aprender aqui poderá ser 
aproveitado para vários tipos e mar- 
cas de computadores pequenos ou 
mesmo grandes. 

Entretanto, existem muitas varian- 
tes da linguagem BASIC, conforme 
a marca do computador: alguns co- 
mandos que existem em um compu- 
tador não existem em outro, ou en- 
tão funcionam de modo diferente. Es- 
sas variantes são chamadas de “dia- 
letos”, Existem, por exemplo, diale- 
tos diferentes para os micros tipo 
TK-85, CP-500, TK-2000 etc. 


Em que computador estudar? 

Para que você aprenda melhor, 
sem ficar confuso com os diversos 
dialetos existentes, este curso ensi- 
nará apenas a variante do BASIC pa- 
ra os microcomputadores menores e 
mais baratos: TK-82C, TK-83, CP-200 
e Ringo Essas são marcas nacio- 
nais de microcomputadores, que fa- 
lam exatamente a mesma lingua- 
gem BASIC, e que são similares 
(compatíveis) com o microcomputa- 
dor inglês chamado Sinclair ZX-81 e 
o norte-americano Timex 100. 

Tudo o que você aprende aqui se 
aplica a todos os computadores des- 
sa linha, mas não a computadores 
de outras marcas. 


Diferenças entre os computadores 
Existem pequenas diferenças en- 
tre as diversas marcas indicadas. 


GRAVADOR CASSETE 


você quiser colocar de novo o progra- 
ma na memória do computador, bas- 
ta “tocar” para ele a fita gravada, e 
ele reconhecerá o programa, automar- 
ticamente. 


Neste curso não ensinaremos como 
montar ou ligar cada tipo de compu- 
tador: isso é facilmente encontrado 
nos manuais que acompanham os 
micros. Quanto à operação do tecla- 
do e do vídeo, as diferenças são as 
seguintes: 
— os computadores da Microdigi- 
tal (TK-82C, TK-83 e TK-85) têm exa- 
tamente o mesmo sistema de ope- 
ração e disposição das teclas. A 
única diferença é que o TK-82C e o 
TK-83 têm um teclado de membra- 
na (sem partes móveis), ao passo 
que o TK-85 têm teclas mecânicas; 
— a tecla chamada de NEWLINE, 
nos computadores tipo TK, é cha- 
mada de , nos computado- 
res CP-200 e Ringo. Entretanto 
sua função é exatamente igual 
em todos; 
— a disposição do teclado CP-200 
e do Ringo é ligeiramente diferen- 
te da encontrada nos TK. O 
CP-200 tem duas teclas SHIFT, ao 
invés de uma, e tem duas teclas 
RESET vermelhas, na parte supe- 
rior do teclado. O Ringo tem uma 
tecla de ENTER em uma disposi- 
ção diferente dos anteriores, mar- 
cada com uma flecha para baixo; 
— a forma como aparecem textos 
e gráficos na tela de TV também 
pode ser diferente. Nos computa- 
dores TK, as letras são escuras, so- 
bre fundo branco. No CP-200, nor- 
malmente é o contrário (letras 
brancas sobre fundo escuro), mas 
isso pode ser facilmente invertido. 
No Ringo, você pode mudar de 
uma cor para outra com o auxílio 
de um interruptor. 
Quanto ao restante da operação, 
todos os computadores funcionam 
da mesma maneira. 


Assim, o gravador auxilia a memó- 
ria principal do computador e por is- 
so ele é chamado de “memória auxi- 
liar”. 

À medida que você aprender BA- 
SIC, você também será capaz de en- 
tender os programas de computador 
escritos nessa linguagem. E poderá 
também começar a escrever outros 
programas — os seus programas! 

Quando você ligar o microcompu- 
tador, ele já estará pronto para acei- 
tar instruções em BASIC, digitadas 
por você no teclado. 

Ele sabe BASIC porque essa lin- 
guagem já vem gravada em uma me- 
mória especial, colocada na fábrica, 
dentro da caixa do teclado. Essa me- 
mória nunca se apaga, ao contrário 
da outra, que vai ser usada para co- 
locar os seus programas e dados. 


Um aviso importante: embora seja 
possível aprender programação sem 
computador, isso não é recomendá- 
vel. Este curso permite que você tes- 
te as lições e os programas e realize 
os exercícios e os testes em um com- 
putador qualquer, do tipo indicado 
aqui. Você verá que o seu rendimen- 
to será muito maior. 


Como utilizar este curso 
As lições do curso de BASIC são 

organizadas em capítulos, que irão 
apresentando os comandos e sua uti- 
lização em uma certa ordem. À não 
ser que você já conheça BASIC, não 
tente pular capítulos ou estudar fo- 
ra da ordem. Os capítulos são dividi- 
dos em seções distintas, cada um 
com três partes: 

— texto 

— exercícios 

— teste 


Você deve inicialmente ler o texto, 
seguindo atentamente todos os 
exemplos. Teste os exemplos dados 
no computador e veja os resultados. 
Tente modificar os programas, em 
seguida realize os exercícios propos- 
tos, Use sua imaginação e tente fa- 
zer programas, usando sua própria 
cabeça. 

Finalmente, realize o teste e veja 
o seu desempenho. Se você errou 
muito ou não conseguiu responder a 
todas as questões, estude a seção 
mais uma vez. 

E lembre-se: não adianta apren- 
der uma linguagem qualquer, para 
depois não usá-la. Fatalmente você 
a esquecerá após um certo tempo. 
Durante e após o curso, use bastan- 
te o computador, sempre tentando 


“criar novos programas! 


C A P í 


T U LO 
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alo OMO USAR O 


MICRO- 
COMPUTADOR? 
ER 


Agora que você já sabe como é o 
microcomputador, vamos aprender a 
operá-lo. 


ontagem do 
BD O micro- 
computador 


As instruções completas para liga- 
ção do computador podem ser lidas 
no próprio Manual do equipamento. 
Aqui damos apenas algumas instru- 
ções gerais. 


1) Ligue primeiro o computador, por 
meio de um cabo apropriado, no lu- 
gar onde se liga a antena externa, 
no aparelho de TV. Se algum fio já 
estiver ligado nesse lugar deve ser re- 
tirado. 


2) Agora ligue o computador na toma- 
da. Nos computadores tipo TK, isto 
deve ser feito através de uma FONTE 
DE ALIMENTAÇÃO. 


3) Agora ligue o fio da TV em uma ou- 
tra tomada. 

Veja como deverão estar ligados 
os fios: 


ANTENA 


FONTE DE 
ALIMENTAÇÃO 


4) Agora ligue'o aparelho de TV. Co- 
loque o seletor de canais no canal 2. 


5) Para ligar o computador use o in- 
terruptor marcado (LIGA-DESLIGA). 


6) Gire o botão de sintonia até obter 


a imagem de uma letra K na parte in- 
ferior da tela. 


7) Usando os botões de brilho e de 
contraste da TV, ajuste-os até que a 
letra K apareça o mais nitidamente 
possível na tela. 

Se você não conseguir enxergar 
bem a letra K, aperte algumas teclas 
do teclado. Veja como as letras que 
você apertou vão aparecendo na te- 
la. Assim ficará mais fácil acertar a 
sintonia. 

Se o computador já estiver monta- 
do, é muito mais simples colocá-lo 
em funcionamento: 

1) ligue o aparelho de TV. 

2) ligue o computador. 

Para desligar o computador, faça 
exatamente ao contrário: primeiro 
desligue o botão LIGA-DESLIGA, lo- 
calizado atrás da caixinha, depois 
desligue o botão de força do apare- 
lho de TV. 

Experimente agora ligar e desligar 
o computador uma, duas ou três ve- 
zes. Não fique com medo de danifi- 
car o computador com esse procedi- 
mento: ele é feito para suportar bem 
essas operações. Inicialmente não va- 
mos usar o gravador cassete, por is- 
so não é necessário aprender agora 
como ele é ligado ao computador. 

A primeira coisa que aparece na 
tela da TV, quando você liga o com- 
putador, é a letra K, dentro de um 
quadrinho preto, na parte de baixo 
da tela: 


Este quadrinho é chamado de CUR- 
SOR. Toda vez que ele aparecer na 
tela, no mesmo lugar, significa que o 
computador está pronto para aceitar 
suas ordens ou comandos, em lingua- 
gem BASIC. 


PARA DAR COMANDOS AO COM- 
PUTADOR USAMOS O TECLADO 


Olhe agora para o teclado. 


[27037] 
[o dwidecdra]rafv=]u'do Do de] 


BEBE SBEBIS 
[om dz Dx do "Bv ds Inu od: 


1) As teclas com letras e números 
têm a mesma disposição que as de 
uma máquina de escrever comum: 
Q W, E, R, T, Y, etc... Letras, algaris- 
mos ou sinais de pontuação estão es- 
critos numa mesma tecla. 

Ao conjunto de todas as letras e si- 
nais gravados nas teclas chamamos 
de CARACTERES DE TEXTO. 

2) Em cada tecla existem vários sím- 
bolos ou palavras, que são chama- 
dos RÓTULOS DA TECLA. Algumas 
teclas têm apenas 2 símbolos ou pala- 
vras, outras têm até 6. Olhe a tecla 
da letra P: 


PRINT 


TAB 


Você pode ver que o símbolo mais 
em cima de todos é PRINT. 

Logo abaixo dele, temos um sinal 
em vermelho: aspas. 

Finalmente, embaixo de todas, ve- 
mos a palavra TAB, 

Todos estes símbolos e palavras po- 
dem ser introduzidos (informados) ao 
computador, usando-se a mesma te- 
cla: a tecla da letra P. 

Mas como o computador sabe qual 
palavra ou símbolo nós vamos intro- 
duzir, se a tecla é uma só? 

Isto é muito simples. Vamos experi- 
mentar um pouco para você perce- 
ber como é feito. 

A postos? Muito bem: 

Pressione a tecla P uma vez. Não 
precisa apertar muito forte, Note que 
se ouve um sinal sonoro fininho quan- 
do se aperta a tecla. Ele é chamado 
de bip. 

Quando o computador soar o bip, 
quer dizer que ele aceitousaquilo que 
você quis transmitir a ele, ao pressio- 
nar a tecla. 

Olhe para a tecla agora: 

Veja como na parte de baixo apare- 
ceu a palavra PRINT. O cursor agora 
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foi deslocado para depois da palavra 
PRINT na tela, e ainda é um quadra- 
dinho preto. 

Mas note que agora a letra dentro 
dele é), E 

ESTA“É A PRIMEIRA FUNÇÃO DA 
TECLA: 

Quando o cursor na tela tem a le- 
tra K dentro, ao pressionarmos a te- 
cla, a palavra ou símbolo que estiver 
hem em cima das outras é informada 
ao computador. Esta palavra é uma 
instrução ou comando ao computa- 
dor, na linguagem BASIC. 


dando ao 
uma ordem: ESCREVA. 
Mas escrever o quê? Precisamos 
dar a ele alguma outra informação. 
Pressione agora a tecla onde está 
o número 8, 
Veja o que ocorreu: 


Estamos computador 


O algarismo 3 apareceu na tela, 
depois da palavra PRINT e um espa- 
ço em branco. O cursor mudou de no- 
vo para um lugar logo após o núme- 
ro 3, e ainda tem a letra L dentro. 

Por isso que ele se chama CUR- 
SOR: ele mostra exatamente o ponto 
onde vai ser colocada mais uma ou- 
tra informação, se você pressionar 
uma tecla qualquer. E 

ESTA É À SEGUNDA FUNÇÃO DA 
TECLA: 

Quando o cursor na tela está com 
a letra L dentro, ao pressionarmos 
uma tecla, a letra ou número marca- 
do são informados ao computador. 

Agora pressione a tecla SHIFT, e 
pressione ao mesmo tempo a tecla K 
(podem existir duas teclas marcadas 
SHIFT: uma de cada lado do teclado, 
na fileira de baixo). 

Veja como está a tela agora: 


PRINT 3 L 


Apareceu o sinal + (mais), logo de- 
pois do número 3, certo? Note que o 
cursor mudou de novo de lugar, indo 
para depois desse sinal de +. 

ESTA É A TERCEIRA FUNÇÃO DA 
TECLA: 

Quando o cursor na tela tem a le- 
tra L dentro, ao pressionarmos uma 
tecla, ao mesmo tempo que a letra 
SHIFT, a palavra, ou símbolo, locali- 
zada em segundo lugar (em verme- 
lho) é informada ao computador. Es- 
ta palavra também é um comando 
ou instrução em BASIC, mas, depen- 
dendo da tecla pode ser também um 
sinal qualquer. 

Neste caso, o sinal + indica ao 
computador uma operação matemáti- 
ca: a soma. 

Agora pressione a tecla marcada 4: 


| ] 
| PRINT3 + SIL] 


Na tela apareceu o número 4, logo 
depois do sinal de soma. 

Estamos dando uma ordem ao com- 
putador: 

PRINT3 + 4 
que em português significa: 
ESCREVA O RESULTADO DE 3 MAIS 4 

Só que o computador ainda não 
obedeceu à nossa ordem. Por quê? 

Acontece que ele ainda não sabe 
se nós terminamos de digitar o co- 
mando completamente. No exemplo 
que estamos estudando, pode ser 
que eu quisesse somar outros núme- 
ros ao 3 ou 4, certo? 

Para informarmos ao computador 
que o nosso comando já está comple- 
to e pode ser obedecido, pressiona- 
mos a tecla 

NEW LINE. 

Esta tecla significa introduzir, em 
português. Com isso, estamos intro- 
duzindo o comando que digitamos 
antes, e que está escrito na parte de 
baixo da tela, no computador. E ele 
poderá obedecer. 

Pressione a tecla NEW LINE; veja o 
que acontece: 


A tela fica toda preta, e depois de 
uma pausa bem pequena (o compu- 


tador está calculando o resultado) 
aparece no alto da tela o número FA 

O número 7 é o resultado da opera- 
ção 3 + 4, efetuada pelo computa- 
dor, e ele é escrito na tela com o co- 
mando que você introduziu pelo te- 
clado: PRINT. 

Na parte de baixo aparecem os nú- 
meros 0/0. 

Isto significa que o computador 
não achou nenhum erro no comando 
que você introduziu. Isso às vezes po- 
de acontecer! 

Mais tarde vamos explicar direiti- 
nho o que significa isso. 

Se você digitou errado alguma coi- 
sa na tela, e não sabe como apagá- 
la, pode desligar o computador. Tor- 
ne a ligá-lo após alguns segundos, e 
comece tudo de novo. 

Não se preocupe que isso não vai 
prejudicar o computador, nem mu- 
dar os ajustes já feitos na TV. 

Após terminarmos o último exercí- 
cio a tela estava assim: 


Para voltar novamente o cursor K 
é tela, pressione a tecla NEW LINE: 


O computador está pronto para 
aceitar outros comandos. 


Resumo 
Até agora vimos que existem dois ti- 
de cursores: [K] e 

indica que o computador aceitará 
uma ordem ou comando, quando for 
pressionada uma tecla. 

A instrução ou comando são pala- 
vras da linguagem BASIC, marcadas 
na parte superior do teclado, acima de 
du BASIC. 

xemplos de instruções em 2 

EDIT STOP 


PRINT cLS 

Localize cada uma destas palavras 
no teclado, 

Se a palavra desejada estiver escrita 
em vermelho, a tecla SHIFT deverá ser 

ressionada ao mesmo tempo. 

indica que o computador aceitará 

uma letra, número ou sinal marcados 
em vermelho, a tecla SHIFT deverá ser 
pressionada ao mesmo tempo. 


omo corrigir 
erros de 
digitação 


Os erros que surgirem durante a di- 
gitação de uma linha podem ser cor- 
rigidos antes que pressionemos a te- 
cla NEW LINE. 

Para isso, usamos a tecla sobre a 
qual está escrito RUBOUT, no canto 
superior direito do teclado. RUBOUT 
quer dizer CANCELAR, em portu- 
guês. 

Para usar a tecla RUBOUT, deve- 
mos pressionar ao mesmo tempo a te- 
cla SHIFT, e a tecla O (zero). Note que 
a palavra RUBOUT está marcada em 
vermelho acima da tecla com o nú- 
mero 0. Por isso temos que usar a te- 
cla SHIFT. 

Cuidado! Se você esquecer de 
apertar a tecla SHIFT, fará aparecer 
na tela o número 0, ao invés de can- 
celar. 


Vamos seguir um exemplo: 
Vamos supor que você quer digitar 
o seguinte comando: 


PRINT 3 + 25 
Mas errou, e digitou: 
PRINT 4 + 25 


Introduza esse comando pelo te- 
clado: 

O cursor na tela está marcado [E]. 

Pressione a tecla P: aparece PRINT 
eo cursor muda para [U. 

Pressione a tecla 4: aparece o nú- 
mero 4. 

Pressione a tecla K juntamente 
com SHIFT: aparece o sinal + 

Pressione as teclas 2 e 5: aparece o 
número 25. 

Agora, queremos corrigir o núme- 
ro 4, mudando-o para 3. 

Existem duas maneiras de se fazer 
isso: 


PRIMEIRA MANEIRA DE CORRIGIR 
UMA LINHA 


Pressione a tecla SHIFT, e a mante- 
nha abaixada com o dedo. 


Agora pressione a tecla RUBOUT 
uma vez. Veja que o cursor L volta pa- 
ra trás, e apaga da tela o número 5. 


Repita a operação (SHIFT e RU- 
BOUT) por mais três vezes. 

Veja que fica na tela somente o co- 
mando PRINT que você tinha digitado: 


Depois que todos os números esti- 
verem apagados, pressione nova- 
mente as teclas 3, +, 2e 5. Veja que 
o comando ficou como você queria: 


Pressione a tecla NEW LINE para 
ver o resultado. 


SEGUNDA MANEIRA DE CORRIGIR 


Às vezes, quando o comando é 
muito comprido, não vale a pena 
apagar tudo para corrigir alguma coi- 
sa bem no começo. 

E possível voltar até onde estava o 
erro, sem ser preciso apagar. 


Observe o teclado de seu TK-85. 

A tecla 5 tem, na parte de cima, uma 
flechinha virada para a esquerda. 

E a tecla 8 tem uma flechinha vira- 
da para a direita. 


—L > 


[5] 


Com essas duas teclas, podemos 
mover O cursor para trás e para dian- 
te, na linha de comando, para corri- 
gir o que quisermos. 


TESTE 


2.1. O que devemos fazer para ligar 
um microcomputador? 


2.2. Desenhe aqui o que aparece na 
tela, quando o computador é liga- 
do: 


2.3. Defina com suas próprias pala- 
vras: 
CURSOR: 
CARACTERES DE TEXTO: 
RÓTULOS DA TECLA: 
BIP: 


2.4. O que significa para o computa- 
dor, quando o cursor está com as le- 
tras: 


[E : 
[LJ: 


2.5. Cite as três coisas para que ser- 
ve uma tecla do microcomputador 
que você já conhece: 


2.6. Sem usar o computador, escre- 
va qual será o resultado dos seguin- 
tes comandos: 

a. PRINT 345 — 12 +8 

b. PRINT 968 — 234 + 2 


2.7. Que tecla devemos pressionar 
para aparecer de novo a tela com o 
cursor K, depois de ter sido mostra- 
do o resultado de um comando 
PRINT? 


2.8. Que tecla devemos pressionar 
quando queremos introduzir no com- 
putador algum caracter ou palavra 
marcado em vermelho na tecla? 


2.9. Que tecla devemos pressionar 
para que o computador realize o cál- 
culo dentro de um comando PRINT? 


2.10. Faça um desenho mostrando 
como se ligam entre si as partes de 
um computador (vídeo e teclado): 


Vamos seguir um exemplo para 
ver como ambas funcionam. 
Suponhamos que você queira es- 
crever este comando: 
PRINT 65 + 47 
E errou, êscrevendo: 
PRINT 25 + 47 
E Escreva este comando no computa- 
or: 


Veja como o cursor fica no final da 
linha de comando. Para apagar ape- 
nas o número 2 (errado), sem apagar 
os outros, usamos a flechinha volta- 
da para trás «—: 

Aperte SHIFT e a tecla 5 ao mesmo 
tempo: 


Veja como o cursor voltou a ficar 
entre os números 4 e 7: 

Agora torne a pressionar as teclas 
5 e SHIFT mais 3 vezes. 

Cuidado para não esquecer de 
pressionar SHIFT, que fará aparecer 
o número 5 na linha! 


Agora o cursor está exatamente de- 
pois do número que queremos corri- 
gir. Pode pressionar a tecla RUBOUT 
(não se esqueça que isto se faz pres- 
sionando ao mesmo tempo as teclas 


SHIFT e 0): 


Para introduzir o número correto, 
basta pressionar a tecla com o núme- 
ro 6, Veja como o 6 entra perfeitamen- 
te: 


Se agora você quiser ver o resulta- 
do do comando, pressione a tecla 
NEW LINE. 


A TECLA NEW LINE PODE SER 
PRESSIONADA COM O CURSOR EM 
QUALQUER POSIÇÃO. 


Entendido? 


Se você apertou a tecla com a fle- 
chinha < muitas vezes, pode aconte- 
cer que o cursor vá para o começo 
da linha: 


Para fazê-lo voltar até a posição 
correta, pode usar a tecla com a fle- 
chinha para a direita —, que é usa- 
da pressionando-se ao mesmo tempo 
as teclas SHIFT e 8: 


Note que a palavra PRINT é “pula- 
da” de uma vez só, quando se aperta 
uma das teclas com flechinhas. 

Experimente apagar com RUBOUT 
a palavra PRINT. Note que ela tam- 
bém é apagada de uma só vez. 


Introduza no computador as linhas de co- 
mando abaixo, uma de cada vez, e pressio- 
ne a tecla NEW LINE para ver o resultado. 

Olhe bem para a linha antes de pressio- 
nar a tecla NEW LINE. 


1) PRINT 43 + 65 

2) PRINT 235 — 123 

3) PRINT 49 + 22 — 3 

4) PRINT 894 — 425 + 11 

5) PRINT 123 + 456 + 789 — 56 
6) PRINT 11 + 45 — 234 — 123 
7) PRINT 9 + 12 — 78 


8) Introduza um comando para realizar a so- 
ma dos números 12, 24 e 33 


9) Se o Zico já fez 765 gols, quantos faltam 
para completar 1000? 


10) Introduza um comando para somar as 
idades de três amigos seus. 


Agora introduza as linhas de comando 
abaixo, uma de cada vez. Antes de pressio- 
nar a tecla NEW LINE, corrija a linha de co- 
mando, usando as teclas + > e RUBOUT, 
de modo a ficar igual à segunda linha. De- 
pois pressione a tecla NEW LINE e anote o 
resultado: 

Errado 


Certo Resultado 


11) PRINT 957 + 125 PRINT 957 + 124 


12) PRINT 23 — PRINT 23 + 
19+45 12+45 
13) PRINT 482 + PRINT 582 — 
234 — 12 294 5 12 
14) PRINT 123 — PRINT 1213 + 
1+85 12+85 
15) POKE 43 + PRINT 43 + 12 
12-55 — 55 
16) POKE 23412 + — PRINTG4I + 998 ; 
998756 q 
É 
ID PRINTIZIS— PRINTIZI3+ 
2342 345 — 2342 
18) PRINT 908]478 


PRINT 12.34 — 
45.5 


PRINT 808 + 478 1 
19) PRINT 1.234 — 


PRINTS 


rros que o 
computador 
acusa 


O computador não aceita coman- 
dos que estejam escritos de forma er- 
rada para ele. Se isso acontecer, ele 
mostra na tela o erro, e espera que 
você o corrija. 

Introduza no computador a seguin- 
te linha: 

PRINT 23 + + 34 


A tela fica assim: 


Observe que até agora o computa- 
dor ainda não notou nenhum erro. 

Pressione agora a tecla NEW LINE, 
para que o computador realize o cál- 
culo. 

Note o que aconteceu: 


Apareceu outro quadradinho, se- 
melhante ao cursor, mas com a letra 
S dentro. 

Mesmo sendo parecido, o S não é 
um cursor. Ele é uma mensagem de 
erro, escrita pelo computador para 
avisar que você escreveu algo erra- 
do no comando (no caso, dois sinais 
+ + em seguida). 

Note que o S fica exatamente de- 
pois do primeiro sinal, Isso quer dizer 
que o computador indica que o se- 
gundo sinal está errado (está sobran- 
do). 


O ERRO SÓ FOI NOTADO PELO 
COMPUTADOR AO SE PRESSIONAR 
NEW LINE 


S indica um erro de sintaxe. Sinta- 
xe quer dizer forma correta de escre- 
ver um comando para o computador. 

A linguagem BASIC é muito sim- 
ples, mas o computador não vai en- 
tender nada que for escrito fora das 


regras dessa linguagem. Felizmente 
ele indica o erro, para que possamos 
corrigi-lo. 

Enquanto você não corrigir esse er- 
ro, o computador não obedece ao co- 
mando. 

Experimente pressionar NEW LINE 
de novo. Note que o computador in- 
siste na mesma mensagem e não 
obedece a um comando errado. 

Para corrigir o comando errado, 
use as teclas <— e RUBOUT, exata- 
mente como você treinou antes. 

Note que, ao pressionar a tecla <— 
para voltar ao local do erro, a mensa- 
gem'S desaparece. O computador re- 
conheceu que você está querendo 
corrigir a linha, e retirou a mensa- 
gem para não atrapalhar. 


Agora apague o segundo sinal + 
com RUBOUT: 


E pressione NEW LINE para ver o 
resultado: 


Agora o computador aceitou a li- 
nha de comando. 


TESTE 


3.1. Qual é a tecla usada para apagar al- 
guma letra ou número da tela? 


ATENÇÃO! Nos exercícios seguintes não 
use o computador! 


3.2. Suponhamos que foi introduzida es- 
ta linha no computador: 
PRINT 123 + 456 
a. Escreva como ficará a linha se eu 
pressionar RUBOUT três vezes: 
b. E, agora, se em seguida eu pressio- 
nar as teclas 2, 3e 5. 
c. E, agora, se eu pressionar a tecla 
NEW LINE: 


3.3. Suponhamos que foi introduzida es- 
ta linha no computador: 

PRINT 325 + 459 

a. Escreva como ficará a linha, se eu 
pressionar a tecla <- duas vezes: 

b. E, agora, se eu pressionar a tecla — 
mais uma vez: 

c. E, agora, se eu pressionar a tecla —» 
por duas vezes, depois a tecla RUBOUT 
uma vez, e depois o número 5: 

d. E como ficará o resultado, se agora 
eu pressionar NEW LINE: 


3.4. Diga o que está errado nos seguin- 
tes comandos: 

a. PRINT 345 + + 825 

b. PRINT 34]902 

c. PRINT PRINT 345 


3.5. O que significa a mensagem S? 


3.6. O que acontece com a mensagem S, 
quando eu pressiono RUBOUT,<= ou => 


3.7. Que tecla temos que pressionar para 
o computador verificar se existe algum 
erro na linha de comando? 


ERCCE 


Introduza as linhas de comando 
abaixo, uma de cada vez. Note que ca- 
da uma delas tem um erro. Anote o er- 
ro que você acha que a linha tem, an- 
tes de introduzi-la no computador. 
Errado Qual é o erro? 


1) PRINT 45 + — 25 


Agora pressione a tecla NEW LINE. 
Veja onde aparece a mensagem S. 
Corrija, e pressione NEW LINE de no- 
vo. Anote o resultado. 


Resultado * 


2) PRINT 23 — — 2 


Cc aPÍí 


TUIAÕO 


a. 


COMPUTADOR 
a É UMA 
ã, CALCULADORA! 


Da 
Como você viu, usando a instrução 
PRINT, nós podemos fazer contas 
com o computador. Até agora, só 
aprendemos a fazer somas e subtra- 
ções bem simples, como 
PRINT 34 + 25 

Agora vamos aprender como fazer 
contas bem mais complicadas. Você 
vai ver que o seu microcomputador 
pode achar o resultado de sentenças 
ou expressões matemáticas, com to- 
dos os tipos de operações (inclusive 
multiplicação e divisão). 

PARA USAR O COMPUTADOR 
COMO UMA CALCULADORA, PRE- 
CISAMOS SEMPRE COLOCAR UM 
COMANDO PRINT ANTES DA EX- 
PRESSÃO MATEMÁTICA. 

Esse modo de operação é chama- 
do de MODO DIRETO. 


ultiplicação 
B he Divisão 


Ds 

Você já aprendeu que usamos os si- 
nais + (mais) e — (menos), para orde- 
nar ao computador que faça uma so- 
ma ou uma subtração. 

Isso quer dizer que o computador 
usa os mesmos sinais que aprende- 
mos em Matemática. 

Mas, para a multiplicação e a divi- 
são, a operação é um pouco diferen- 
te na linguagem BASIC: 

A MULTIPLICAÇÃO USA O SINAL 
»* EM VEZ DE X 
- A DIVISÃO USA O SINAL / EM VEZ 

E 

Por exemplo: 

Quanto é 34 multiplicado por 5? 

Digite a linha PRINT 34 + 5 no tecla- 
do, e aperte a tecla NEW LINE: 

Vai dar o resultado: 170 

Outro exemplo: 

Quanto é 14 dividido por 3? 

Digite a linha PRINT 14/3 no tecla- 
do, e aperte a tecla NEW LINE: 


Vai dar o resultado: 


Por que o computador não aceita 


os sinais x e +, como na Matemáti- 
ca? Você mesmo pode imaginar por 
quê: 


O sinal de vezes (x) pode ser con- 
fundido com a letra x 

O sinal de dividir (+) não existe no 
teclado. 

Mas por que não posso usar o sinal 
: para a divisão? A resposta é igual à 
anterior: o computador o confundiria 
com dois pontos. Dois pontos e a le- 
tra x significam outras coisas para o 
computador, por isso não podem ser 
usados. Certo? 


fem = ru] & 
Eras EA Ea Ed 
Vamos fazer alguns exercícios de 
multiplicação e divisão no computa- 
dor, usando a instrução PRINT. Po- 
nha a resposta ao lado, e também o 
resultado da expressão (use o com- 
putador!): 


1.2.5x4.8 
2. 1234 x 0.345 x 2 


Resposta: 


10. Meu pai me dá Cr$ 30 000,00 de 
mesada. Quanto eu ganho por dia? 
Resposta: 


11. Invente cinco exercícios usando 
divisão ou multiplicação de núme- 
ros: 


ombinando 
operações 


e 
A linguagem BASIC consegue fazer 
contas contendo várias operações 
matemáticas misturadas: somas, sub; 
trações, multiplicações e divisões. E 
só colocar na instrução PRINT os nú- 
meros e operações que desejarmos, 
exatamente como em uma fórmula. 


Por exemplo: 


3+5/4 


Uma combinação como esta é cha- 
mada de expressão aritmética, por- 
que tem apenas números e opera- 
ções aritméticas. Existem outros tipos 
de expressões, que você irá apren- 
der depois. 

Vamos resolver um probleminha, 
como exemplo: 


Paulo tem 25 moedas de 5 cruzei- 
ros e 14 notas de 200 cruzeiros. Qual 
o total de dinheiro que ele tem? 


SOLUÇÃO 


Como em todo problema matemáti- 
co, primeiro vamos escrever a senten- 
ça que dá a solução: 

total = 25 x 0.50 + 14 x 200 


A instrução em BASIC para o com- 
putador fica assim: 


PRINT 25 * 0.50 + 14 * 200 


Coloque no computador e veja o re- 
sultado. Qual foi? 


fi OMO O 
COMPUTADOR 


FEZ ESSA CONTA? 


Observe que, para acertar nesta con- 
ta, precisamos primeiro fazer as mul- 
tiplicações: 


25 x 0.50 + 14x 200 
1.25 + 2800 
2801,25 


Ou seja, existe uma ORDEM DE 
REALIZAÇÃO das operações: a multi- 
plicação é sempre realizada antes de 
uma soma ou subtração. Se tivésse- 
mos somado antes, o resultado sairia 
errado. 

Como em Matemática, a lingua- 
gem BASIC também faz contas se- 
guindo uma certa ordem (chamada 
ORDEM DE PRECEDÊNCIA, porque 
algumas operações devem preceder 
outras, ou seja, serem feitas antes). 
Preste bem atenção nessas regras: 


1. AS DIVISÕES SÃO SEMPRE FEI- 
TAS EM PRIMEIRO LUGAR 


2. AS MULTIPLICAÇÕES SÃO REALI 
ZADAS DEPOIS DAS DIVISÕES 


3. AS SOMAS E SUBTRAÇÕES SÃO 
FEITAS EM ÚLTIMO LUGAR 


Vamos fazer algumas contas no 
computador, usando a instrução 
PRINT: 

1. A altura do King-Kong foi medi- 
da (depois de morto), sendo igual a 
37 pés e 8 polegadas. Quantas pole- 
gadas ele tinha de altura? 


SOLUÇÃO: 

Um pé (no sistema norte-america- 
no de medidas) tem 12 polégadas 
Altura = 12x37 +8 

PRINT12+37 +68 


Coloque no computador e anote o re- 

sultado. Qual é a operação que o 

computador irá realizar primeiro? 
Resposta: 


2. O comprimento do monstro de 

Loch Ness é de 50 pés e 5 polegadas. 

Quantos centímetros ele mede? 
SOLUÇÃO: 


Veja agora que eu tenho que fazer 
uma expressão mais difícil. Primeiro 
eu multiplico 50 pés por 12 e somo 5, 
para ter o resultado em polegadas. 
Depois multiplico tudo por 2.54, que 
é o valor de uma polegada em centí- 
metros. 


Se eu fizer: 
PRINTS0*12+5+2.54 
vai dar errado, pois primeiro o compu- 
tador vai realizar a multiplicação de 5 
por 2.54. Para evitar isso, posso usar 
parênteses, como na Matemática: 
PRINT (50 * 12 + 5) + 2.54 
Agora vai dar certo, pois primeiro 
o computador faz as contas dentro 
dos parênteses. Depois multiplica o 
resultado por 2.54. 
Tente fazer no computador este 
exercício. 
Resposta: 


3. O jogador Zico tinha 300 000 dó- 
lares no banco. Depois recebeu co- 
mo luvas metade de 456 784 dólares, 
menos o imposto de 40 000 dólares. 
Quantos cruzeiros ele terá no total? 
(Imagine que 1 dólar valia, na épo- 
ca, 556 cruzeiros.) 

SOLUÇÃO: 


O total de dólares no banco será: 
PRINT 300 000 + (456 784 — 40 000)/2 
ATENÇÃO: Como você já deve ter 
notado, não se usa nas calculadoras 
o ponto para separar centenas, mi- 
lhares etc., quando se coloca um nú- 
mero no computador. O ponto é usa- 
do pela linguagem BASIC como uma 
vírgula (para separar a parte inteira 
da parte fracionária de um número). 
Esse é o sistema usado nos Estados 
Unidos, onde a linguagem BASIC foi 
inventada. 

Para obter em cruzeiros, multiplica- 
mos tudo por 556. Para formar ape- 
nas uma expressão, temos que usar 
outros parênteses: 

PRINT (300 000 + (456 784 — 40 000)/2) 
* 556 

Coloque no computador e veja 

qual é o resultado. 


Resposta: 


Agora você aprendeu uma coisa 
importante: 

A EXPRESSÃO MATEMÁTICA PO- 
DE CONTER PARÊNTESES DENTRO 
DE PARÊNTESES 
e parênteses dentro de parênteses 
dentro de parênteses... quantos se 
quiser usar. 

Está vendo como é parecido com o 
uso de chaves e colchetes, que você 
aprendeu em álgebra? 

Só há uma diferença: o computa- 
dor usa sempre parênteses. À lingua- 
gem BASIC não aceita colchetes ou 
chaves. 

Por isso algumas expressões po- 
dem ficar muito confusas, e você po- 
de esquecer de colocar algum parên- 
tese, ou colocá-lo errado. 

Lembre-se da seguinte regra: 

O NÚMERO DE P. SES À DI- 
REITA DEVE SER IGUAL AO DE PA- 
RÊNTESES À ESQUERDA. 


Depois de escrever a expressão, 
conte o número de parênteses. Se 
eles não forem pares, há um erro em 
algum lugar. 


CU O 
Enio 
1. Escreva a instrução PRINT para 
as expressões matemáticas abaixo 
(depois coloque no computador e 
anote o resultado): 
a.4787:2 + 455 x 855 
b.12+34+45x0.5 
c. 34.2 + 87:33 
d. 35.4 + 75 — 42 


89 — 68 
e. (12.8-5.6 x 45) 
2 
E (35-7 — (45.8) x 1.7 
2 2 


2. Assinale o que está errado nas ex- 
pressões abaixo. Depois coloque no 
computador e anote o resultado. 

a. PRINT 45 » (63 — 12 

b. PRINT 83 + 45)/22 

c. PRINT (23.45 + 34.2/8 — 3)) 

d. PRINT 34.5 + 12 — 3,44 

e. PRINT (33 — [22 * 11]/2 

t. 895 — 43,3 + 12 


3. Um carro tinha 25.6 litros de com- 
bustível no tanque. Depois de uma 
viagem, ficou apenas com 17.3. Se o 
litro de gasolina custasse 1 688 cru- 
zeiros, quanto custaria a gasolina 
gasta na viagem? 

Resposta: PRINT 

Resultado: 


4. O Palmeiras fez 25 gols no campeo- 
nato e levou 13 gols. Cada gol a fa- 
vor vale 5 pontos positivos, cada gol 
contra vale 7 pontos negativos. Com 
quantos pontos ficou o Palmeiras? 
Resposta: PRINT 

Resultado: 


5. Quantos segundos tem um ano? 
Resposta: PRINT 
Resultado: 


6. Qual é a média das notas 5.6, 8.2 
e7.5? 

Resposta: PRINT 

Resultado: 


“ 


Nem sempre o seu computador vai 
mostrar a resposta do modo como vo- 
cê quer. Preste bem atenção nos 
exemplos seguintes e entenderá por 
quê. 

Experimente colocar no computa- 
dor a seguinte expressão: 

PRINT 2/3 
Veja como ficou a resposta: 


Você deve saber que o resultado 
desta conta tem um número infinito 
de 6 depois do ponto: 
0.66666666666666666666666.... etc. 

O computador mostrou apenas 6 
casas decimais. Além disso, ele colo- 
cou um 7 na última casa decimal. Is- 
to é feito sempre que a sétima casa 
for igual ou maior do que 5, e se cha- 
ma ARREDONDAMENTO, 

Suponha que o resultado de uma 
operação é 1.3411123443. O que o 
computador mostrará na tela? 

Resposta: 

Agora suponha que o resultado é 
123.5555. O que o computador mos- 
trará na tela? 

Resposta: 

O computador sempre vai mostrar 
um máximo de 6 algarismos. A não 
ser que haja menos de 6, quando 
mostrará apenas esses. 

Por exemplo: digite a instrução: 

. PRINT 2/4 
O resultado mostrado pelo compu- 
tador na tela é: 
0.5 
Note que ele não mostra: 
0.500000 

Todos os zeros depois do 5 não são 

mostrados. 


unções 
matemáticas 


E rr rs 


Além das quatro operações aritmé- 
ticas (soma, subtração, divisão e mul- 
tiplicação), o computador consegue 
fazer outros tipos de cálculos mais 
complicados. 

Por exemplo, se quisermos que o 
computador extraia uma raiz quadra- 
da de um número qualquer, ele con- 
segue fazer isto através da lingua- 
gem BASIC. 
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Para isso usamos uma instrução es- 
pecial, chamada FUNÇÃO. 

No nosso exemplo, a função que 
queremos calcular é a raiz quadra- 
da. Em BASIC, pedimos ao computa- 
dor para calcular a raiz quadrada 
por meio da abreviação SQR (que 
vem do termo SQUARE ROOT, que 
quer dizer raiz quadrada, em inglês). 

PRINT SQR 16 

Note que devo colocar as coisas 

em uma certa ordem, na instrução: 


PRINT é o comando que diz ao computa- 
dor: mostre o cálculo feito. 

SQR indica ao computador que o cálcu- 
lo que eu quero fazer é uma raiz quadra- 
da. Este é o nome da função. 

16 diz ao computador qual é o número 
do qual vai ser tirada a raiz quadrada. 
Ele é chamado argumento da função. 


Experimente digitar essa linha no 
computador. 

1. Para introduzir a 
PRINT, pressione a tecla P: 


instrução 


2. Para introduzir a função SQR, 
veja que ela está indicada em cima 
da tecla H. Mas o cursor na tela é o 
L. Isto quer dizer que, se apertarmos 
a tecla H, aparecerá a letra H, lem- 
bra-se? Para aparecer a função SQR, 
devemos antes pressionar a tecla 
SHIFT, bem como a tecla NEW LINE. 

Pressione e veja o que acontece: 


“cs PRE E 


O cursor mudou para F. 

Isto quer dizer que, se eu apertar a 
tecla H, aparecerá o que está indica- 
do logo acima da tecla (a função 
SQR), e não a letra H. 

Toda vez que eu quiser introduzir 
no computador uma função, tenho 
que transformar o cursor na tela pa- 
ra F. 

Isto é feito ordenando-se uma 
FUNCTION, que se consegue pressio- 
nando-se SHIFT e NEW LINE, ao mes- 
mo tempo (note que FUNCTION está 
escrito em vermelho, acima da tecla 
NEW LINE). 

Pressione agora a tecla H, e veja o 
que acontece: 


Note que o cursor voltou a ser L no- 
vamente. 

Isto quer dizer que o computador 
está esperando que você introduza o 
argumento (número): 


Pressione NEW LINE e veja o resul- 
tado do cálculo: 


Experimente realizar no computa- 
dor os exercícios abaixo. Escreva a 
instrução PRINT e coloque o resulta- 
do ao lado: 

a. 25 

b. 10 

c. 100 

d. 3.14159 

e.2 


Uma função matemática também 
pode ser colocada dentro de uma ex- 
pressão aritmética: 

PRINT 25 + SQR 19 

O computador vai calcular primei- 
ro a função, antes de realizar a so- 
ma. Isso quer dizer que calcular uma 
função vem antes, na ordem de pre- 
cedência. 

Coloque no computador e veja o re- 
sultado. 

Outro exemplo: 

PRINT SQR 25 + SQR 9 

O resultado é 8, porque o computa- 
dor calcula primeiro o resultado das 
duas funções, depois soma os resulta- 
dos. 

Agora, se eu fizer: 

PRINT SQR (25 + 11) 

O resultado será 6, certo? 

O uso dos parênteses forçou o com- 
putador a fazer primeiro a conta 25 + 
1 e só depois tirar a raiz quadrada. 


Para treinar, vamos fazer o seguin- 
te exercício: 


Elenice atravessou um campo de 
futebol com 100 m de comprimento 
por 40 m de largura (veja o desenho 
ao lado). Quantos metros ela teve 
que andar? 


SOLUÇÃO: 

O problema é de geometria. Um 
triângulo como o da figura tem a se- 
guinte expressão para calcular a hi- 
potenusa a partir dos catetos (teore- 
ma de Pitágoras, lembra-se?): 


A2=B2+C? 


Então, a instrução PRINT para re- 
solver o problema é simplesmente: 


4.1. Escreva os símbolos usados em 
BASIC para as seguintes operações 
aritméticas: 
. adição 
. subtração 
. multiplicação 
divisão 


4.2. Por que não são usados os sím- 
bolos x e: para multiplicação e di- 
visão em BASIC? 

Resposta: 


4.3. Numere as operações aritméti- 
cas, de acordo com a ordem em que 
são efetuadas, dentro de uma ex- 
pressão em BASIC: 


Subtração 
Multiplicação 
Divisão 
Adição 


4. Coloque as expressões abaixo 
m forma de PRINT: 


E É DX (+= (1: 2) 


4.5. Faça os seguintes exercícios uti- 
lizando o comando PRINT. Primeiro 
escreva a linha de instrução formu- 
lando o problema, depois coloque 
no computador e anote o resultado. 


SERIA 


Veja que B:B é a mesma coisa do 
que B?. 

Existe também uma outra manei- 
ra de representar um expoente em 
BASIC: é através do sinal ++ (dois as- 
teriscos). Ele está em cima da letra 
H, e, para conseguir colocá-lo na te- 
la, basta apertar a tecla SHIFT junta- 
mente com a tecla H. 


nte: 
PRINT SQR (B+*2 + C++2) 


Cuidado para não apertar a tecla 
* duas vezes: na tela vai aparecer a 
mesma coisa, mas o computador 
não vai aceitar. Tem que apertar a 
tecla que dá dois asteriscos de uma 
vez. OK? 


TESTR 


a. Qual é a área de um triângulo 
de base 120 e altura 25? (Dica: 
ÁREA = BASE x ALTURA.) 
Resposta: 


b. Qual é a soma das áreas de um 

triângulo de base 32 e altura 44 e 
um quadrado de lado 24? (Utilize 
apenas uma instrução PRINT.) 
Resposta: 


c. Qual é o volume de um cubo 
com 32,8 cm de aresta? 
Resposta: 


d. Um campo de futebol americano 
mede 100 jardas. Cada jarda mede 
36 polegadas. Qual é o comprimen- 
to do campo em centímetros e em 
metros? (Dica: uma polegada vale 
2,54 cm.) 

Resposta: 


e. Uma motocicleta gastou 25,8 li- 
tros de gasolina em uma viagem. 
No começo da viagem o mostrador 
de quilometragem indicava 12346 
e, ao final da viagem, indicava 
13193. De quantos quilômetros por 
litro foi o consumo? 

Resposta: 


f. À circunferência de um círculo é 
dada pela fórmula 2 x m x R. (R é 
o raio.) Uma bicicleta tem a roda 
com o raio de 35,234 cm. Qual é a 
circunferência da roda? (Dica: a 
constante 7 vale 3,14159.) 


Escreva aqui embaixo o resultado: 


Resposta: 

A exponenciação (um número ele- 
vado a outro) é uma operação com 
ordem de precedência mais alta do 
que a divisão. Ou seja: 


SE HOUVER UMA EXPONENCIA- 
ÇÃO, ELA SERÁ CALCULADA EM 
PRIMEIRO LUGAR 

Por exemplo: 

PRINT 2 + 3+*2/3 
Dará o resultado 5, porque o compu- 
tador primeiro calculará 3+*2 (que é 
9), depois dividirá o 9 por 3 (pois a 
divisão é a que vem depois). Aí ele 
fará a soma. 

Existem muitas outras funções no 
BASIC, além da raiz quadrada. De- 
pois aprenderemos outras. 


Resposta: 


g. Quantas voltas por quilômetro 
dará uma roda de automóvel com 
um diâmetro de 45 cm? 

Resposta: 


h. Em um triângulo retângulo, o 
quadrado da hipotenusa é igual à 
soma dos quadrados dos catetos. 
Supondo que a hipotenusa mede 
29,238 e um dos catetos mede 12,34, 
qual é o valor do outro cateto? 
Resposta: 


4.6. Verifique se os comandos abai- 
xo estão corretos. Se não estiverem, 
coloque ao lado a forma correta. De- 
pois, digite no computador e escre- 
va o resultado ao lado. 


a. PRINT (2 + (3 + 4) — 

b. PRINT PRINT 

c. PRINT 84 + 1135-20+4767 
d. PRINT —-3+— 4 


4.7. Para que servem os parênteses 
em uma expressão matemática em 
BASIC? 


Resposta: 


* 
4.8. O que substitui as'chaves e col- 
chetes de uma expressão matemáti- 
ca em BASIC? 
Resposta: 


x 


AFI 


os 
PROGRAMAR O 
COMPUTADOR? 


SS e 


Quando quisermos que o computa- 
dor faça algum cálculo e mostre o re- 
sultado na tela, usamos o comando 
PRINT. Este comando, junto com a ex- 
pressão matemática, funciona como 
uma ordem para o computador. 

Assim, se você escrever no teclado 
esta instrução: 

PRINT 34534 + 12111 
e pressionar a tecla NEW LINE, o 
computador fará a conta e mostrará 
o resultado na tela: 


E SE VOCÊ QUISER FAZER DE NO- 
VO A MESMA CONTA NO COMPU- 
TADOR? 

Você já sabe a resposta: 

A instrução precisa ser introduzida 
de novo no computador. 

Se você tiver que fazer uma série de 
contas repetidas, isso vai dar muito tra- 
balho, porque cada vez você vai ter 
que digitar de novo as instruções. 

Felizmente o computador tem ME- 
MÓRIA. 

E existe um macete para colocar 
na memória dele as instruções que 
quisermos. Depois de termos feito is- 
so, ele vai se lembrar das instruções, 
e não vai ser preciso digitá-las de no- 
vo toda vez que quisermos repetir os 
cálculos. 

Preste bem atenção: 

PROGRAMAR O COMPUTADOR É 
COLOCAR INSTRUÇÕES EM SUA 
MEMÓRIA. 

Você vai aprender a fazer um PRO- 
GRAMA. 


m Programa 
em BASIC 
a 


DE 


No capítulo 3, vimos que o computa- 
dor pode ser usado como uma calcula- 
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TU LO 


dora, através do MODO DIRETO. 

O computador obedece a instrução 
PRINT que damos a ele, e em segui- 
da “esquece” a instrução. 

Fazer com que o computador gra- 
ve a instrução em sua memória é a 
coisa mais simples do mundo: , 
BASTA COLOCAR UM NUMERO 
QUALQUER NO COMEÇO DA INS- 
TRUÇÃO. 

Siga o exemplo: 

Se quisermos colocar na memória 
a seguinte instrução: 

PRINT 34534 + 12111 
basta digitar (escrever no teclado) da 
seguinte forma: 

1 PRINT 34534 + 12111 

Vamos entender juntos tudo o que 
está contido nessa linha. 


1 — é o número da linha. Pode ser qual- 
quer número; 

PRINT — é a instrução, ou comando que 
damos ao computador; 

34534 — é um dos dados que fazem par- 
te da expressão matemática de cálculo; 

+ — é a operação que queremos fazer 
(que, no exemplo, é a de somar); 

12111 — é o outro dado da expressão de 
cálculo. 


Experimente digitar essa linha no 
computador, e apertar a tecla NEW 
LINE: 

Veja o que aconteceu: 


O COMPUTADOR NÃO FEZ A 
CONTA! 

Ao invés disso, ele colocou a linha 
que você introduziu lá no topo datela. 

ISSO QUER DIZER QUE ELE GUAR- 
DOU A INSTRUÇÃO NA MEMÓRIA! 

O número 1 significa que essa é a 
primeira instrução que queremos 
que ele obedeça. Depois você vai ver 
que podemos colocar mais instruções 
EM UM MESMO PROGRAMA. 

Note também que a instrução que 
estava digitada na linha de baixo da 
tela desapareceu, como se fosse car- 
regada para a parte de cima. 

E apareceu de novo o cursor K, Isso 
quer dizer que o computador está 
pronto para aceitar mais uma ordem. 

E agora? 

Como vamos fazer para obrigar o 
computador a obedecer a instrução 
PRINT? 

Ele guardou na memória, tudo 
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bem. Mas, para obrigá-lo a EXECU- 
TAR O PROGRAMA (ou seja, obede- 
cer as instruções), eu devo usar um 
novo comando: 

RUN 
e pressionar a tecla NEW LINE. 

RUN, em inglês, quer dizer CORRA! 
Que significa também: RODE O PRO- 
GRAMA. Rodar, na gíria das pessoas 
que lidam com computador, quer di- 
zer: executar um programa que estiver 
na memória do computador. 

Para introduzir o comando RUN, 
aperta-se a tecla R, quando o cursor 
na tela for K. Note que acima da te- 
cla R está escrito RUN. 

Pressione RUN e veja o que acon- 
tece: 


E agora aperte a tecla NEW LINE: 


o resultado no cálculo apareceu na 
tela, em cima. 

Na linha de baixo, a mensagem 
0/1 significa: 


O — não houve nenhum erro no pro- 
grama 

1 — o programa parou na linha núme- 
ro 1 


Agora que a instrução está na me- 
mória do computador (no progra- 
ma), podemos pedir para o computa- 
dor executá-la novamente quantas 
vezes quisermos. Basta digitar RUN 
novamente. Experimente! 

Qual é o resultado? 

Pressione agora a tecla NEW LINE 
de novo. Veja o que acontece: 

O programa apareceu de novo nº 
topo da tela. 

Isto quer dizer que ele ainda estó 
na memória. Se ele está lá ainda 
quer dizer que eu posso executá-l 
novamente com outro comand 
RUN. 

O cursor K também voltou a apare 
cer na parte de baixo da tela. 


azendo 
Programas 


Outra vantagem de colocar as ins- 
truções em um programa é poder 
obrigar o computador a memorizar 
mais de uma instrução. 

Da última vez que você mexeu no 
computador, a tela estava assim: 


Agora vamos colocar uma outra 
instrução no programa. Para isso bas- 
tará colocar outro número no começo 
do novo programa. Esse número de- 
verá estar em ordem crescente, com- 
parado com o número do programa 
anteriormente digitado. Como a ins- 
trução anterior usou o número 1, va- 
mos usar nesta o número 2: 


2 PRINT 897 — 345 


Digite essa nova instrução e pres- 
sione a tecla NEW LINE: 


Note que agora o nosso programa 
tem duas instruções, uma debaixo da 
outra. Por isso demos o número 2 (or- 
dem crescente) à segunda linha. E 
para que o computador saiba que es- 
sa linha deve vir depois da outra: as- 
sim ele vai saber a ordem das linhas. 

Pressione RUN e NEW LINE e veja 
o resultado: 


o computador calculou e mostrou 
primeiro o resultado da linha 1 
e depois o resultado da linha 2. 


Ele sempre obedece assim aos pro- 
gramas: primeiro ele obedece a um 
comando e só depois vai obedecer 
ao outro. 

Se você pressionar NEW LINE nova- 
mente, veja o que acontecerá: 


Aí está o programa novamente. 

Outra coisa interessante de um pro- 
grama BASIC é que eu posso man- 
dar o computador rodá-lo (executá- 
lo) a partir da linha que eu quiser. 
Experimente digitar RUN 2: 


O computador fez apenas a segun- 
da conta, ou seja, ele executou o pro- 
grama a partir da linha número 2. 
SE EU NÃO COLOCAR NENHUM NU- 
MERO APÓS O COMANDO RUN, ele 
começa a executar um programa a 
partir da instrução que estiver em pri- 
meiro lugar. 


omo Apagar 
um Programa 


Se eu quiser tirar este programa 
da memória do computador, para co- 
locar outro, existe o comando: 


NEW 


NEW quer dizer NOVO, em inglês. 
Ou seja, eu quero colocar um progra- 
ma novo, por isso apago da memória 
o programa velho. 


Para introduzir o comando NEW, 
deve-se apertar a tecla A, quando 
na tela estiver o cursor K. 

Experimente: 


E agora aperte a tecla NEW LINE. 
Note que o programa desapareceu 
da memória. 


EXERRR 


Vamos fazer um programa para 
entender melhor o que foi explica- 
do. O problema vai ser o seguinte: 

Vamos fazer um programa para 
mostrar na tela a tabuada de multi- 
plicar pelo número 7. 

O programa para fazer isso deve 
ser assim: 

10 PRINT7+*1 
20 PRINT7+2 
30 PRINT 7*3 
40 PRINT 7 * 4 


Coloque esse programa na memó- 
ria do computador. 

Você deve estar achando estranho 
que os números das linhas neste pro- 
grama vão de 10 em 10. 

Isso não é problema. Como já foi 
dito, a gente pode colocar o número 
de linhasque quiser, desde que este- 
ja em ordem crescente (ou seja, os 
números das linhas que vêm depois 
têm que ser cada vez maiores). Exis- 
te uma vantagem em colocar os nú- 
meros de linha de 10 em 10 ou de 20 
em 20, em vez de 1 em 1, como no 
primeiro programa. Depois você vai 
entender por quê. 

Por enquanto, introduza o progra- 
ma como está aqui. 


E pressione a tecla RUN. O resulta- 
do mostrado na tela será: 


Apareceu tudo de uma vez, uma 
multiplicação em cada linha. 


orrigindo 
o Programa 


E 


O programa que está colocado na 
memória pode ser modificado quan- 
tas vezes eu quiser. 

Existem maneiras de colocar mais 
linhas, digitar de novo uma linha (se 
eu errei ou quero mudá-la), e até 
apagar uma linha. 

Essas são chamadas funções de 
edição do BASIC. 

Observe que eu posso colocar 
mais linhas NO FINAL do programa, 
se eu quiser: 


50 PRINT 7*5 
Pressione RUN. 
O que aconteceu? 


Se uma linha do programa na me- 
mória estiver errada, ouse eu quiser 
mudá-la, basta escrevêla de novo, 
começando com o mesmo número 
da linha: 


Vamos supor que eu quero a linha 
50 mudada para: 
50 PRINT 7 *6 
Experimente digitála assim, e 
pressione NEW LINE. Veja o que 
acontece: 


A linha 50 foi SUBSTITUÍDA por 
uma nova. À linha 50 antiga sumiu. 

Posso também colocar novas instru- 
ções NO MEIO do programa que está 
na memória. 

Suponhamos que eu quero ver tam- 
bém o resultado de 7 vezes 2,5 (apa- 
recendo na tela entre 7x 2e 7 x 3). Ex- 
perimente digitar a linha. 


25 PRINT 7+2.5 


E pressione a tecla NEW LINE: 


Agora pressione a tecla RUN: 


AEDES O O JM 
O COMPUTADOR COLOCA A LI 
NHA DE INSTRUÇÃO NA ORDEM 
CERTA 

Agora você entendeu qual é a van- 
tagem de numerar as linhas de 10 
em 10. Deixando um “espaço” entre 
elas, eu posso mais tarde colocar 
uma ou mais linhas de instrução en- 
tre elas. 

Isso se chama INSERIR LINHAS. 

Outra coisa interessante que posso 
fazer é apagar uma linha sem preci- 
sar apagar todo o programa. 

Com o programa da tabuada na 
memória, experimente digitar ape- 
nas o número de linha 25 e pressione 
NEW LINE: 

Pressionando de novo NEW LINE, 
você vê que a linha 25 desaparece. 

Pressione RUN e me diga qual foi o 
resultado: 

Resposta: 


ns 


= ml -— = 
TESTE 
o) a) 
Agora responda às perguntas abaixo, sobre 
este programa. 
Mas lembre-se: não vale testar no computa- 


dor. Faça de conta que você é o computador! 
Como apareceria o resultado na tela, se o 


E como ficaria o programa, se agora to 
digitado apenas o número: . 
30 (NEW LINE) l 


5.1. O que se deve fazer para colocar uma ins- 
trução na memória do computador? 


5.2. O que acontece quando nós digitamos 


] 
uma linha de instrução que começa com um Qual será o novo resultado, se o compl 


número? 


5.3. O que acontece quando nós digitamos no 
computador uma linha de instrução que não 
começa com um número? 


5.4. Defina com suas próprias palavras o que 
é um PROGRAMA: 


5.5. Cite duas vantagens de poder colocar um 
programa na memória do computador: 


5.6. Para que servem os comandos: 
RUN 
NEW 
PRINT 


5.7. Por que devemos numerar em ordem cres- 
cente as linhas de um programa? 


5.8. Faça de conta que você é o computador, 
e alguém colocou na sua memória o progra- 
ma abaixo: 


10 PRINT 2 + 3/2 


20 PRINT (233 — 33)10 
30 PRINT SQR 16 


computador receber o comando RUN? 


Como apareceria o resultado na tela, se o 


computador receber o comando RUN 20? 


Como ficaria o programa na memória, se um período de 14 anos. 


for introduzida a linha: 


15 PRINT 99 


dor receber o comando RUN novamente? | 
o 


f 
AGORA COLOQUE ESSES o 
COMPUTADOR E VEJA SE CONFERE. t 
5.9. Faça um programa para calcular e 
trar na tela a tabuada de multiplicar 
mero 9: 


5.10. Faça um programa para calcular 
tos segundos tem um ano, e quantos di 


Que Fazem 
Contas 


Vamos fazer agora alguns exercí- 
cios utilizando o comando PRINT den- 
tro de programas. 

Para isso, vamos programar alguns 
exemplos do TESTE do capítulo 3: 


1. Um campo de futebol americano 
mede 100 jardas. Cada jarda mede 36 
polegadas. Qual é o comprimento do 
campo em centímetros e em metros 
(dica: uma polegada vale 2,54 cm) 


SOLUÇÃO: 

10 PRINT 100 + 36 + 2.54 

20 PRINT (100 + 36 * 2.54)/100 

RUN 

A linha 10 vai dar a solução em 
centímetros, e a linha 20 em metros 
(100 jardas vezes 36 polegadas vezes 


2,54 cm dividido por 100, para dar a 
solução em metros). 


2. Uma motocicleta gastou 25.8 litros 
de gasolina em uma viagem. No co- 
meço da viagem o contador de quilo- 
metragem indicava 12346 e, ao final 
da viagem, indicava 13193. De quan- 
tos quilômetros/litro foi o consumo? 


SOLUÇÃO 
10 PRINT (13193 - 12346)/25.8 
RUN 


Resposta! . same npsser apagar 


3. A circunferência de um círculo é 
dada pela fórmula 2 x m x R. O sfm- 
bolo 7 vale 3.14159; e o R é o raio da 
circunferência. Uma roda de bicicle- 
ta tem o raio de 35,234 cm. Qual é a 
circunferência da roda? 


SOLUÇÃO: 
10 PRINT 2 * 3.14159 * 35.234 
RUN 


4. Quantas voltas por quilômetro da- 
rá uma roda de automóvel com diá- 
metro de 45 cm? 


SOLUÇÃO 
10 PRINT 100 + 1000/(3.14159 + 45) 
RUN 


Rasposa:: up no es pomesimiaintas asté 


O número de centímetros contidos 
em um quilômetro é 100 x 1000. 

A circunferência de um círculo é 
igual a m X diâmetro. 

Dividindo o número de centímetros 
em um quilômetro pela circunferên- 
cia, teremos o número de voltas da- 
das em um quilômetro. 


5. Em um triângulo retângulo, o qua- 
drado da hipotenusa é igual à soma 
dos quadrados dos catetos. Supondo 
que a hipotenusa mede 29,238 e um 
dos catetos mede 12,34, qual é o va- 
lor do outro cateto? 


SOLUÇÃO: 


10 PRINT SQR (29.238 2-12.34 
-*2) 


RUN 


Cc A P 1 


T UU LO 


5 


COMPUTADOR 
TAMBÉM 
ESCREVE 


ESSE e e 


Até agora, você viu que podemos 
usar a instrução PRINT para mostrar nú- 
meros na tela do computador, de modo 
direto ou em um programa. O coman- 
do PRINT também serve para calcular 
expressões matemáticas e mostrar, ao 
mesmo tempo, o resultado. 

Agora vamos aprender como pro- 
gramar o computador para que ele 
escreva letras na tela. 

Se conseguirmos fazer com que o 
computador escreva letras, também 
poderemos conseguir que escreva no- 
mes, títulos e mensagens, certo? 

Uma instrução PRINT também po- 
de ser usada para escrever letras (A, 
B, C, D... etc.), e outros sinais espe- 
ciais (& % $ N e outros). As letras, nú- 
meros e sinais especiais são chama- 
dos de CARACTERES. 


A letra À é um caractere. 
O cifrão (8) também é um caractere. 


E o espaço em branco também é 
um caractere (tecla SPC, que quer di- 
zer ESPAÇO, e tem o mesmo efeito 
que aquela barra da parte de baixo 
do teclado da máquina de escrever). 

É muito simples fazer o computa- 
dor escrever alguma coisa. 

Basta colocar entre aspas a MEN- 
SAGEM que nós queremos que ele 
escreva. 

Assim: 


PRINT “ALÔ, EU SOU O 
COMPUTADORR" 


Experimente digitar esta linha no 
computador: 


E aperte NEW LINE: 

Viu? 

O computador escreve na tela exa- 
tamente o que você escreveu entre 
aspas. 
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Mesmo se você tivesse colocado al- 
go errado (ou um palavrão!): 


PRINT “ALÔ, EU SOU O 
COMPUTADOR" 


Ao computador não interessa o 
que você põe entre aspas. 

Pode ser até em turco ou em italia- 
no. Ele reproduz como está. 


PRINT “HELLO, HOW ARE YOU?” 


Podemos colocar mensagens em 
uma instrução PRINT, tanto de modo 
direto (linha sem número no come- 
ço), quanto em um programa (linha 
com um número no começo). 

Vamos fazer um programinha. 

Primeiro pressione a tecla NEW pa- 
ra “limpar” a memória. 

Introduza agora o 
programa: 


10 PRINT “ALÔ, COMO VAI VOCÊ?” 

20 PRINT 

30 PRINT “EU SOU O 
COMPUTADOR TK 85" 

40 PRINT “E EU TAMBÉM SEI 
ESCREVER” 


seguinte 


Você já aprendeu que o computa- 
dor é meio “burro”. 

Ele só faz uma coisa de cada vez. 

Primeiro, ele obedece o comando 
número 10, depois o 20, depois o 30. 

Veja agora o que acontece, se vo- 
cê pressionar a tecla RUN: 


em 
a 


Usando espaços (como o da linha 
20, que fica “em branco” e como os 
da tecla SPC, que separa as pala- 
vras entre si), eu posso colocar onde 
quiser, na tela, alguma mensagem 
ou título: 


10 PRINT “COMPUTADOR TK 85” 


Todos os espaços colocados na 
mensagem entre aspas são mostra- 
dos na tela do computador. 


isturando 
Nomes e 
Números 


E e 


Usar palavras entre aspas dentro 
de uma instrução PRINT é muito útil 
para dar um título às respostas dos 
cálculos feitos pelo computador. 

A instrução PRINT permite a você 
misturar mensagens com expressões, 
na ordem que quiser. 

Vamos dar um exemplo: 

Quantos segundos existem em um 
ano? 

Esse programa você já fez: 

10 PRINT 60 + 60 + 24 + 265 

O computador vai mostrar este Te- 
sultado, quando você pressionar a te- 


cla RUN: 


Você sabe o que significa esse nú- 
mero sozinho lá na tela, certo? Afinal, 
foi você quem resolveu o problema. 


1. Faça um programa para escrever 
Resposta: 


2. Faça um programa para colocar seu nome bem no meio da tela, na linha de cima. 


Resposta: 


Mas os programas de computador 
são feitos também para uso de outras 
pessoas. Por isso é bom colocar títulos 
para explicar os resultados na tela. 

Veja como fica bem melhor assim 
o programa: 

10 PRINT “UM ANO TEM: 60 + 60 + 

24 * 365; "SEGUNDOS." 

Vamos analisar as partes desta 
instrução: 


10 > é o número da linha 

PRINT 5 a instrução para mostrar o 
que vem depois 

"UM ANO TEM” 5 deve aparecer 
primeiro esta mensagem 

; > serve para separar a mensa- 
gem do que vem depois 

60 + 60 + 24 + 365 > cálculo do núme- 
ro de segundos em um ano 

: > serve para separar o número re- 
sultante da palavra 

“SEGUNDOS.” > outra mensagem 


Experimente digitar o programa no 
computador. Pressione a tecla RUN e 
veja o que acontece: 


Viu como funciona direitinho? 

EM UMA INSTRUÇÃO PRINT NÓS 
PODEMOS COLOCAR QUANTOS TÊ 
TULOS, EXPRESSÕES E NUMEROS 
QUISERMOS. 

A única condição é que eles este- 
jam separados uns dos outros por 
meio de espaços. 

Você aprendeu que o ponto e vírgu- 
la (:) é usado para separar os elemen- 
tos (partes) de uma linha de impres- 
são PRINT. 

USANDO O ; NO LUGAR DE SPC, 
AS PARTES DA LINHA DE IMPRES- 
SÃO VÃO ESTAR UNIDAS UMAS 
NAS OUTRAS. 

Ou seja, elas serão mostradas na 
tela sem ter entre si um espaço em 
branco. 

Experimente que diferença faz es- 
tes três comandos PRINT: 


10 PRINT “3 VEZES 2 IGUAL A”; 6 
20 PRINT "3 VEZES 2 IGUAL A 
30 PRINT “3 VEZES 2 IGUAL A 
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Digite este programa no computa- 
dor e veja o resultado quando pres- 
sionar a tecla RUN: 


Quando pomos várias mensagens 
em seguida na mesma instrução 
PRINT, podemos fazer com que elas 
apareçam grudadas umas nas ou- 
tras ou não. Tente digitar as seguin- 
tes linhas-de modo direto: 


PRINT "RENATO", "REJANE" 
PRINT “RENATO *; “REJANE” 
PRINT “RENATO”; ” REJANE” 
PRINT "RENATO" ;” REJANE” 


Responda: qual a diferença entre 
os resultados 
nhas? 


impressos destas li- 


OS ESPAÇOS EM BRANCO DEN- 
TRO DAS DUAS ASPAS TAMBÉM 
SÃO IMPRESSOS. 


mprimindo 
Onde Eu 
Quero 


Depois de saber para que serve o 
ponto e vírgula no comando PRINT, é 
fácil entender como podemos impri- 
mir qualquer mensagem ou resulta- 
do em um ponto qualquer da tela. 

Vamos mostrar um exemplo: 

Eu quero imprimir na tela uma li- 
nha contendo o nome de um time de 
futebol (no começo da linha), depois 
a cidade de onde ele é (começando 
na posição número 15 da linha), e 
quantos pontos ele tem (começando 
na posição número 25 da linha). 

Pondo vários times assim, vai se 
formar uma tabela bonitinha, com to- 
das as colunas alinhadas, certo? 


PALMEIRAS SÃO PAULO 12 
GUARANI CAMPINAS 9 
PONTEPRETA CAMPINAS 7 


É claro que nós podemos fazer li- 
nhas PRINT assim: 


10 PRINT “PALMEIRAS SÃO PAULO 
12” 

20 PRINT “GUARANI CAMPINAS 9" 

30 PRINT "PONTE PRETA CAMPINAS 
E 


Mas é claro que assim há muito 
desperdício de espaços*em branco. 

Cada letra, número ou espaço que 
colocamos dentro de uma mensagem 
PRINT ocupa uma unidade a mais de 
memória no computador. 

Como o computador não tem mui- 
ta memória, às vezes é importante 
economizá-la. 

Outra coisa aborrecida neste méto- 
do é que temos que digitar um monte 
de brancos repetidos. Isso demora e 
sempre apresenta erros (contamos o 
número errado de brancos). 


PARA CONTAR ESPAÇOS EM 
BRANCO ENTRE DUAS MENSA- 
GENS OU NUMEROS, EXISTE UMA 
FUNÇÃO ESPECIAL EM BASIC 


Lembra-se das funções? 

O exemplo que nós demos foi da 
raiz quadrada (SQR): você fornece 
um número (o argumento), e a fun- 
ção calcula outro (a raiz quadrada). 

Agora vamos estudar a função 
TAB, 

(Procure onde ela fica no teclado. 
Lembre-se de que é preciso transfor- 
mar antes o cursor em F, pressionan- 
do SHIFT E NEW LINE). 

Ela não calcula nada: apenas colo- 
ca onde quisermos os elementos de 
uma instrução PRINT. 


Por exemplo: 
PRINT TAB 10;"VIDEO GAME” 


Vai escrever a mensagem: 


começando na posição 10 da linha, 
quando o comando PRINT for obede- 
cido. 
Dizemos que houve uma TABULA- 
ÇÃO até a coluna (ou posição) 10. 
Veja como ficaria melhor o nosso 
programa de exemplo: 


10 PRINT "PALMEIRAS"; TAB 15; 
“SÃO-PAULO"; TAB 25:12 

“20 PRINT “GUARANT"; TAB 15; 
“CAMPINAS”; TAB 25;7 

30 PRINT"PONTE PRETA"; TAB 15; 
“CAMPINAS”; TAB 25;5 


” 

Digite o programa no computador 
(nunca se esqueça de pressionar a te- 
cla NEW LINE se antes já tiver algum 
programa na memória, que possa 
apagá-lo). 

Veja como o resultado é idêntico 
aio programa anterior. 
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E você aprendeu algumas coisi- 
nhas agora: 


1. A FUNÇÃO TAB NÃO CALCULA 
NADA (NÃO É MATEMÁTICA) 


2. O ARGUMENTO DE TAB INDICA 
EM QUE COLUNA VAI COMEÇAR A 
MENSAGEM 


3. POSSO COLOCAR VÁRIOS TAB 
NUMA MESMA LINHA 


4. A FUNÇÃO TAB FUNCIONA SO- 
MENTE PARA UMA LINHA NA TELA 


Uma outra coisinha: o argumento 
da função TAB também pode ser 
uma expressão matemática. Por 
exemplo: 


PRINT TAB (45 - 3+2);/MEU NOME" 


que é calculado pelo computador 
e vale a mesma coisa que: 


PRINT TAB 39;/'MEU NOME" 


Note que temos que usar parênte- 
ses quando a expressão é constituída 
por letras. 

Agora, para não usar de modo er- 
rado o comando TAB, é importante 
saber o seguinte: 


UMA LINHA NA TELA DO TK 85 TEM 
ATÉ 32 COLUNAS 


Por isso, não é bom colocar um nú- 


Vamos fazer agora alguns exercí- 
cios simples. 

Vamos pegar alguns exemplos de 
EXERCÍCIOS anteriores de cálculo, 
usando o PRINT, e vamos colocar al- 
guns títulos para melhorar a manei- 
ra como o computador mostra os re- 
sultados na tela. 

Para cada programa seguinte, pro- 
cure fazer várias linhas: umas con- 
tendo os dados do problema, e ou- 
tras os resultados. 


1. Um carro tinha 45.5 litros de com- 


bustível no tanque. Depois de uma 
viagem ficou apenas com 10.0. Eu ti- 
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mero maior que 32 como argumento 
de TAB: 

Não funciona colocar vários TAB 
numa mesma linha, mas com argu- 
mentos que sejam menores do que 
os que vinham antes. 

Por exemplo: 
rei TAB 12; JOÃO E"; TAB 5;"MA- 

Experimente no computador para 
ver o que acontece. 

Resposta: 


Existe também uma outra maneira 
mais simples de separar as partes 
misturadas de um comando PRINT, 
por meio de tabulações: é usando a 
vírgula. 

A diferença entre o ponto e vírgula 
e a vírgula é que esta tabula, na ho- 
ra da impressão, a mensagem ou re- 
sultado, começando na coluna 16 na 
tela. 

Vamos seguir estes exemplos: 


PRINT "RENATO", "REJANE” 


Vai aparecer assim na tela: 


nha gasto Cr$ 12 400,00 para encher 
o tanque de 50 litros. Quanto custou 
o litro de gasolina e quanto custou a 
gasolina gasta na viagem? 

Resposta: 


Resultado: 


2. Qual é a média das notas 4.5, 8.6, 
3.2e 7.0? 
Resposta: 


Note que RENATO está começando 
na coluna 1 da primeira linha, e RE- 
JANE na coluna 16 da mesma linha. 


A vírgula funciona como TAB 16. 
Agora outro exemplo: 


PRINT “COMPUTADOR”, TK 85", 
“FUNCIONA” 


Vai aparecer assim na tela: 


O que aconteceu? 

A primeira vírgula colocou TK 85 
na coluna 16 da primeira linha. 

A segunda vírgula iria colocar 
mais 16 espaços de tabulação (o que 
daria 32). 

Mas como a linha só tem 32 colu- 
nas, a palavra FUNCIONA foi para a 
primeira posição da linha seguinte! 

Podemos usar a vírgula para brin- 
car um pouco: 


PRINT'FLIPERAMA”, LEGAL", TK 
8" 


Veja que duas vírgulas sem nada 
entre si, valem dois TAB 16. 


Resultado: 


3. Um campo de futebol americano 
mede 100 jardas. Cada jarda mede 
36 polegadas. Qual é o comprimento 
do campo em centímetros e em me- 
tros (dica: uma polegada vale 2,54 
em)? 

Resposta: 


Resultado: 


6.1. Digite no computador: 

a. PRINT 8 + 6 

b. PRINT"8 « 6” 

c. PRINT"8 + 6 =":8+ 6 

Qual foi o resultado em cada caso? 
Explique a diferença: 


6.2. Para que servem a vírgula e o 
ponto e vírgula dentro de uma de- 
claração PRINT? 


6.3. Qual é a utilidade de se mistu- 
rar mensagens entre aspas e resul- 
tados numéricos ou expressões ma- 
temáticas em um comando PRINT? 


6.4. Quais são as dimensões da tela 
do TK 85: 

número de linhas: 

número de colunas: 
Para que serve a última linha de 
baixo na tela? 


6.5. Verifique se os comandos abai- 
xo estão corretos. Se não estiverem, 
coloque ao lado a forma correta. De- 
pois, digite no computador e escre- 
va o resultado ao lado. 


a. PRINT (2 + (3+4)-2 

b. PRINT PRINT 

c. PRINT 84 + 113520 + 4767 
d. PRINT “TK";85;"C” 


e. PRINT "CURSO DE COMPUTA- 
DORES" 


TESTE 


f. PRINT —3 + —4 
g. PRINT“CONTAS DE SOMAR 


h. PRINT"COMPITADOR 


6.6. Usando a função TAB, escreva 
uma instrução PRINT para colocar a 
palavra COMPUTADOR exatamen- 
te no centro da linha da tela. 


6.7. Escreva uma instrução PRINT 
para colocar na tela os números de 
la8, distribuídos em duas colunas, 
assim: 


6.8. Responda: TAB é: 
a. comando 
b. função 
c. programa 
d. não existe em BASIC 


6.9. Para que serve a função TAB? 


6.10. Faça de conta que você é o 
computador. Como ficará a tela do 
computador, depois de obedecer ele 
as instruções seguintes? 


a. PRINT"MEU NOME É”, “DANIEL” 


b. PRINT TAB 25;"TESTE”,,,"ESPA- 
CIAL” 


c. PRINT TAB 12;12;TAB 28;28 


6.11. Responda se é verdadeiro (V) 
ou falso (F): 
() A função TAB não calcula ne- 
nhuma função matemática. 
() Só se pode colocar um TAB em 
cada instrução PRINT. 
() À vírgula usada para separação 
em PRINT funciona como TAB. 
() TAB quer dizer tabulação. 
() Posso usar a função TAB com 
um número maior do que 32. 


6.12. Faça um programa para colo- 
car na tela uma lista de 3 times de 
futebol, numerada. Por exemplo: 

1 PALMEIRAS 

2 BOTAFOGO 

3 FLAMENGO 
Resposta: 


6.13. Faça um programa para colo- 
car um sinal + em cada canto da te- 
la (dica: use o comando PRINT AT). 


epetindo 
Coisas 


DR 


Outro dia eu me convenci de que 
devia escrever quatro vezes meu no- 
me na tela do computador. 

O programa para fazer isso é fácil, 
não acha? 

10 PRINT “RENATO” 
20 PRINT “RENATO” 
30 PRINT “RENATO” 
40 PRINT “RENATO” 


O computador vai obedecer assim: 


Faça a mesma coisa com o seu no- 
me e veja o resultado! 

Eu também poderia ter escrito as- 
sim: 

10 PRINT “RENATO RENATO RENA- 
TO RENATO” 

Em vez de aparecer tudo na verti- 
cal (um nome em cada linha), ia apa- 
recer tudo na horizontal, certo? 

Pois bem. E se eu quiser encher a 
tela inteira com o meu nome? 

Não responda já: preste bem aten- 
ção. 

A tela tem 21 linhas. Eu teria que 
colocar no programa 21 instruções 
PRINT, todas iguais. 

Daria muito trabalho, não é? 


EU POSSO ORDENAR AO COMPU- 
TADOR QUE REPITA UMA LINHA DE 
PROGRAMA QUANTAS VEZES EU 
QUISER. 


Basta mandar que ele “volte” até a 
linha PRINT. 
Assim: 


10 PRINT “RENATO” 
20 GOTO 10 


A instrução GOTO, em 
quer dizer: VÁ PARA 

Portanto, GOTO 10 quer dizer: VÁ 
PARA A LINHA NUMERO 10! 

Como é que isto faz o computador 
repetir a linha 10? 

Lembra-se de que eu disse que o 
computador obedece (executa) uma 
linha de cada vez? E que ele só exe- 
cuta a linha seguinte depois de fazer 
o que a linha anterior diz? 


inglês, 


2 


Pois bem. Siga as flechinhas abai- 
xo. Você é o computador. 


10 PRINT “RENATO” 


v 


20 GOTO 10 


A primeira vez que eu pressionar a 
tecla RUN, o que acontece? 

O computador obedece a instrução 
na linha 10, e escreve na tela: 


Em seguida ele va obedecer a li- 
nha 20, que diz a ele: 

VÁ PARA A LINHA 10 

E ele, bonzinho, volta para lá e exe- 
cuta de novo a linha 10: 

“E de novo: 


Até preencher a tela toda! 


Quando ele preenche a tela, apare- 
ce na última linha a mensagem: 


5/10 


Isso quer dizer que o computador 
parou na linha 10, acusando uma 
mensagem número 5. 

A mensagem número 5 significa: 


NÃO HÁ MAIS ESPAÇO NA TELA 


(veja a lista de mensagens de erros 
no fim da obra, onde está explicado o 
que significa cada uma delas). 


Agora o computador vai ficar espe- 
rando que você decida o que fazer: 
a. Se você quiser ficar lendo ou admi- 
rando a tela escrita, ele espera. 


b. Se você quiser que o programa 
continue a ser executado, procure on- 
de fica o comando CONT. Ele signifi- 
ca CONTINUE: você está dizendo a 
ele para continuar. 

O que acontece? 

A tela fica escura, e depois o pro- 
grama continua a repetir a linha 10. 
c. Quando você estiver cansado de 
ver o programa continuar, ao apare- 
cer a mensagem 5/10 pressione a te- 
cla NEW LINE: 


aparece de novo o programa que es- 
tava na memória. 

Uma outra maneira de interromper 
o programa (parar de executar), en- 
quanto ele estiver ainda escrevendo 


as linhas, é pressionar a tecla 
BREAK. 
BREAK em inglês quer dizer QUE- 
BRAR ou INTERROMPER. 

Veja onde fica a palavra, acima 
da tecla NEW LINE. 


Por isso você precisa pressionar ao 
mesmo tempo a tecla SHIFT e a tecla 
NEW LINE. 

Esta tecla BREAK só funciona en- 
quanto o programa ainda não pa- 
roú, ao chegar ao final da tela. 

Faça agora um programa para es- 
crever seu nome em toda a tela (um 
nome em cada linha): 


Como fazer para escrever o nome 
em toda a tela, mas um depois do ou- 
tro (vários em cada linha da tela)? 


Experimente este: 


10 PRINT “RENATO”; 
20 GOTO 10 


Qual foi o resultado? 


Note que este programa tem duas 
coisas diferentes do outro: 

1. existe um espaço em branco entre o 
fim do nome (letra O) e a última aspa. 
2. existe um ; no final da linha 10. 

Para explicar o que aconteceu é 
fácil: 

colocando um ; no final da linha 
10, a próxima vez que o computador 
repeti-la, o nome aparecerá unido ao 
anterior. 

Lembra-se de que o ponto e vírgu- 
la serve para separar as partes de 
uma instrução PRINT, que queremos 
que apareçam unidas? 

Aqui também funciona deste jeito. 

Se eu não puser um ; no final da li- 
nha PRINT, a próxima vez que o com- 
putador obedecer outro PRINT, ele 
passará a escrever na linha de bai- 
xo, e assim por diante. 

Coloquei o espaço em branco de- 
pois do nome RENATO para não apa- 
tecer assim na tela: 


RENATORENATORENATORENATO- 
RENATORENATO etc. 


Experimente colocar o seu nome 
ou então com uma frase assim: 


10 PRINT “MARIO E O MAIORAL”; 


ou então: 


10 PRINT “JOÃOZINHO QUER NAMO- 
RAR MARIA"; 


esenhando 
na Tela 


Agora você vai ver que o computa- 
dor TK-85 também pode ser usado pa- 
ra desenhar uma porção de coisas 
na tela, através da programação. 

Essa maneira de desenhar gráfi- 
cos especiais é chamada de MODO 
GRÁFICO. 

E ele funciona de uma maneira 
muito simples: é também com a ins- 
trução PRINT. 

Se você olhar bem o teclado, ve- 
rá que na parte de cima de algu- 
mas teclas existem uns desenhos en- 
graçados. 

Eles são chamados de CARACTE- 
RES ou BLOCOS GRÁFICOS. 

Nós temos no teclado os seguintes 
blocos: 


1, Faça um programa para colocar 
na tela as palavras TIC e TAC, uma 
em cada linha, até encher toda a te- 
la, assim: 


Resposta: 


2. Modifique o programa para escre- 
ver toda a tela, mas com as pala- 
vras TIC e TAC unidas. 

Resposta: 


3. O que faz este ga (paço 


110 PRINT TAB 16; “I” 
125 GOTO 10 
Resposta: 


4. O que há de errado com este pro- 
grama? 
40 PRINT "PROGRAMA BASIC"; 
55 GOTO 45 
Que mensagem de erro vai apare- 
cer, se você colocar esse programa 
no computador e executá-lo? 


5. O que faz este programa? 
100 GOTO 100 
Como devo fazer para interromper 
o programa, neste caso? 


TECLA GRÁFICO 


sil 
LM 
Pr 
o 
1 
a 
mm 
Ê 
E 
da 
E 
mM 
nº 
no 


z 


Se você prestar bem atenção, pode- 
rá ver que eles correspondem aos pe- 
dacinhos de um quadrado dividido 
em quatros partes, combinados de di- 
versgs maneiras: 


HR 


Alguns dos blocos gráficos tam- 
bém têm partes cinza (pontinhos bem 
pequenos e próximos). 

Com estes blocos gráficos podemos 
montar uma série de desenhos inte- 
ressantes: 


um aviãozinho 


um foguete 


Eme 


um dado 


Veja como é fácil! 

Para colocar dentro de uma instru- 
ção PRINT os blocos gráficos, eles de- 
vem estar dentro de aspas. Coloque 
a seguinte linha de programa (pres- 
sione NEW antes): 


Para poder digitar os blocos gráfi- 
cos, devemos mudar o cursor L (le- 
tras) para G (gráficos). 

Isto é feito pressionando-se simulta- 
neamente as teclas SHIFT e 9. Veja 
que está escrita a palavra GRA- 
PHICS em cima do rótulo da tecla 9. 
Isso quer dizer GRÁFICOS em portu- 
guês, certo? 

Note que, quando você fizer isso, o 
cursor muda para G: 


19 PRINT [6] 


Agora tudo o que você digitar pelo 
teclado aparecerá de forma diferente. 
Pressionando AO MESMO TEMPO 


a tecla SHIFT e uma tecla contendo 
um bloco gráfico, ele aparecerá na 
tela. 

Experimente digitar SHIFT e a te- 
cla W: 


Depois SHIFT 6, SHIFT W e SHIFT 6 
de novo: 


19 PRINT “ Emalham 


RC As. = SE O css 


Veja que está se formando uma fi- 
gura, porque os blocos gráficos ficam 
grudados (o que não acontece com 
as letras). 

Para colocar as aspas no final, te- 
mos que sair do MODO GRÁFICO. 

Apertamos então as teclas SHIFT e 
9 novamente: 


19 PRINT“ Rmalhom [Lu] 


ERA Rea O da 


Veja que o cursor mudou de novo 


para L. 

Agora sim pressione aspas e de- 
pois NEW LINE. 

Pressione RUN para ver o que 
acontece: 


Colocando várias linhas de progra- 
ma alinhadas, os blocos gráficos das 
linhas de cima se grudam com os de 
baixo: 


E 


9 PRINT“ ” 
o prin mp 


Veja que agora conseguimos fazer 
um aviáozinho. 

Tente fazer, como exercício, as ou- 
tras figuras mostradas logo no come- 
ço desta lição! 

O modo gráfico também pode ser 
usado para escrever as letras e ou- 
tros caracteres em cor preta sobre o 
fundo branco, ao invés de como apa- 
recem normalmente na tela. 

Esta maneira de escrever se deno- 
mina MODO INVERSO, ou caracte- 
res em campo invertido. 

Vamos dar um exemplo: 

Suponha que eu quero escrever o 
nome deste computador bem no 
meio do topo da tela, em caracteres 
inversos. Assim: 


Para conseguir isso, você deve 
usar o MODO GRÁFICO para escre- 
ver o nome. Só que não deve pressio- 
nar a tecla SHIFT antes, como no ca- 
so dos blocos gráficos. Pressione as 
teclas das letras que você quiser colo- 
car normalmente: 

Comece digitando: 

10 PRINT TAB 10;” 


Depois pressione SHIFT junto com 
a tecla 9 para mudar o cursor para G 
(GRAPHICS): 


Agora pode digitar as letras TK 85: 


Viu como saiu direitinho? 

Agora pressione SHIFT e 9 juntos 
novamente, para mudar o cursor pa- 
ra L, e digite o sinal de aspas do final 
e pressione NEW LINE: 


Pressione RUN e veja o que acon- 
tece! 


7.1. O que significa para o computa- 
dor quando ele está mostrando na 
tela os seguintes cursores: 


7.2. Defina o que quer dizer: 
MODO GRÁFICO 


MODO INVERSO 


7.3. Que teclas devemos apertar pa- 
ra conseguir digitar os blocos gráfi- 
cos (cursor G)? 


7.4. Faça um programa para dese- 
nhar na tela a figura de uma cabe- 
ça de palhaço dando risada. 


ES ERROS 


1. Faça de novo o exercício de escre- 
ver TIC e TAC na tela, com um pro- 
grama (lembra-se? TIC em uma li- 
nha e TAC em outra). Só que desta 
vez TIC deve aparecer em caracteres 
normais (letras brancas em fundo 
preto) e TAC em caracteres inversos 
(letras pretas sobre fundo branco). 
Resposta: 


2. Faça um programa para colocar 
no topo da tela uma moldura assim, 
com seu nome no meio dela. Experi- 
mente com diversos caracteres gráfi- 
cos até achar uma moldura bem bo- 
nita: 

Resposta: 


3. Vamos fazer um programa para 


TESTER 


7.5. Modifique o programa anterior 
para colocar a cabeça do palhaço 
no lado direito da tela (dica: use a 
função TAB em todas as linhas 
PRINT). 


7.6. Por que eu devo fazer o cursor 
voltar a ser L antes de digitar as as- 
pas no final de uma instrução 
PRINT com blocos gráficos? 


7.7. Vamos rememorar. Para que 
servem as teclas: 


NEW LINE 
RUBOUT 
RUN 


NEW 


desenhar uma tapeçaria na tela. É 
muito fácil: 

Coloque em primeiro lugar uma ins- 
trução PRINT contendo 7 ou 9 blocos 
gráficos diversos, um grudado no ou- 
tro (entre aspas). Depois coloque 
uma instrução GOTO para repetir 
este PRINT. 

Pressione RUN e aprecie o resul- 
tado! 


Coloque diferentes combinações de 
blocos gráficos para testar qual vai 
ser q tapeçaria mais bonita. Escreva 
o programa que produziu a mais bo- 
nita aqui: 


e 

> 
GRAPHICS 
FUNCTION 
SHIFT 
BREAK 
SPACE 


CONT 


E para que servem as instruções e 
funções (dê um exemplo de cada). 


PRINT 


TAB 


sando Variáveis 
dentro de um 
Programa 


Ds 


Agora que você percebeu a utilida- 
de das variáveis para armazenar da- 
dos e resultados intermediários, va- 
mos ver alguns exemplos com progra- 
mas. Digite no computador cada um 
dos programas abaixo, e veja o resul- 
tado. Procure substituir alguns valo- 
res para obter diferentes resultados. 


1. Dados dois números, AeB, faça 
um programa para obter o resultado 
da soma, subtração, multiplicação e 
divisão entre os dois. 


SOLUÇÃO 
Note que das linhas 30 a 60 existe 
uma diferença entre o que está entre 
aspas (é uma mensagem) e o que es- 
tá fora das aspas (é uma expressão). 
O que é mensagem é mostrado na te- 
la exatamente como está. O que é ex- 


pressão é usado para calcular. 
10 LET A=25 
20 LET B=12 
30 PRINT'A + B =";A+B 
40 PRINT"A — B=";A— 
50 PRINT'A x B="“;A'B 


60 PRINT'A /B =";A/B 


Pergunta: Qual é a vantagem de 
se colocar primeiro os dados (no ca- 
so, 25 e 12) dentro de variáveis? 


2. Dados o lado (L) e a altura (A) de 
um retângulo, faça um programa pa- 
ra calcular a área e o comprimento 
da diagonal. 


L 


PEV 


SOLUÇÃO 

Temos que usar as fórmulas corres- 
pondentes ao cálculo da área e da 
diagonal de um retângulo (veja a fi- 
gura). 
Em BASIC, a exponenciação é obti- 
da com o operador ** (ele tem uma 
tecla especial: não se pode apertaf a 
tecla * duas vezes, pois haverá erro 
no resultado. A tecla * * fica acima 
da letra H). A raiz quadrada é obtida 
com a função SQR: para digitá-la, 


26 


pressione simultaneamente SHIFT e 
NEW LINE, depois pressione a tecla 
da letra H. 

10 LET L=10 

20 LET A=5 

30 PRINT'PROBLEMA DO RETÂN- 
GULO" 

40 PRINT'= == === =." 
5U PRINT 

60 PRINTTO COMPRIMENTO DO LA- 


DO ré :L 

70 PRINT“A ALTURA ="“;A 

80 PRINT 

90 LET ÁREA = L*A 

100 LET DIAG = SQR L*+2 + A2 

110 PRINT"ÁREA =";ÁREA 

120 PRINT'DIAGONAL =";DIAG 

Pergunta: As linhas 90 e 100 são ne- 

cessárias? Por quê? 


capítulo 3, usando variáveis: 


1.2. O jogador Zico tinha 300 000 dó- 


Quantos cruzeiros ele terá no total 
(faça a conta como se o dólar vales- 
se 2 800 cruzeiros. Repita O cálculo 
como se o dólar valesse 6 000 cruzei- 
ros). ; 

Resposta: 


1.3. Um carro tinha 25.6 litros de 
combustível no tanque. Depois de 


meses e D dias. Calcule 
quantos meses, dias e horas esta 
pessoa já viveu, aproximadamente. 
Resposta: 


aixinhas 
para Nomes 


O 


Até agora vimos que a memória 
do computador pode ser usada para 
armazenar números. Esses números 
podem ser o resultado de uma ex- 
pressão matemática: 


LET C = 23 + (25.7-14.2/13 


Neste exemplo, C é o nome da “cai- 
xinha” ou memória que receberá o 
resultado da conta, à direita do sinal 
de igualdade, 

Outra maneira de colocar um va- 
lor numérico em uma variável é por 


meio de uma constante: 
LET PI = 3.1415 


Neste exemplo, PI é o nome da va- 
riável. O número à direita do sinal 
de igualdade não contém nenhuma 
operação matemática ou nome de va- 
riável, por isso é chamado de cons- 
tante. 

Mas não são só números que O 
computador consegue armazenar. 

PODEMOS GUARDAR LETRAS E 
OUTROS CARACTERES NA MEMÓ- 
RIA DO COMPUTADOR 

Para isto, o BASIC do seu computa- 
dor nos permite usar “caixinhas” es- 
peciais, que servem para guardar na 
memória conjuntos de letras e de ou- 
tros caracteres. 
| UM CONJUNTO DE CARACTERES 
É CHAMADO DE CADEIA 

Outro nome muito usado para des- 
crever um conjunto de caracteres é 
“string”, uma palavra inglesa que 
significa “cordão”. 

Você já viu antes cadeias de carac- 
teres, lembra-se? 

Por exemplo, no comando: 


PRINT “RENATO” 


Neste caso, a cadeia é uma pala- 
vra formada de 6 caracteres: 


RENATeo. 


Mas uma cadeia pode incluir outros 

caracteres. Pode ser uma frase: 
RINT “O BRASIL TEM 120 M- 

LHÕES DE HABITANTES" 

ou, então, pode ser uma mistura de 

caracteres: 


PRINT “+% ee =8" 
ou caracteres gráficos: 
PRINT “Bam 


Como podemos dizer ao computa- 
dor que queremos armazenar uma 
cadeia de caracteres em uma variá- 
vel da memória? 

Preste atenção: 

LET N$ = “RENATO” 

Este comando LET está dizendo pa- 
ra o computador: 

GUARDE A CADEIA DE CARACTE- 
RES (ENTRE ASPAS) NA VARIÁVEL 
CHAMADA N$ 

O sinal de cruzeiro ($), também 
chamado de cifrão, serve para indi- 
car ao computador que a variável é 
do tipo alfabético (ou seja, deverá ar- 
mazenar letras e outros caracteres). 
|. Note que, se você esquecer de pôr 
o sinal $ depois do nome da variável, 
o computador vai “estrilar”! 

Experimente digitar no compu- 
tador: 

LETN = “RENATO” 

Veja o que aparece na tela: 


Experimente fazer o mesmo, na for- 
ma de um programa, assim: 
IOLETN = “RENATO” 
e depois digite RUN. O que acontece? 


A mensagem de erro está indican- 
do que os tipos não combinam, ou 
seja: 

- a variável à esquerda de = é do ti- 
po numérico 

- a constante & direita de = é do tipo 
alfabético 

O mesmo erro ocorreria se você 
tentasse o contrário: 

IO LET N$ = 123 
O que está errado nesta linha? 


BB oro o 


Computador 
Armazena 
um Nome? 


No começo deste capítulo, vimos 
que o computador usa unidades de 


memória (as caixinhas mostradas 
nos desenhos) para armazenar nú- 
meros. 


Para armazenar nomes, a coisa é 
um pouco mais complicada, mas tam- 
bém é fácil de ser entendida. 

Vejamos: a memória do microcom- 
putador é feita de tal forma que com- 
porta apenas um caractere (uma le- 
tra, por exemplo) em cada caixinha. 
Assim, o nome RENATO seria guar- 
dado em 6 caixinhas agrupadas que 
receberiam a “etiqueta” (nome da va- 
riável) N$. y 

O computador permite que tenha- 
mos até 255 caixinhas agrupadas pa- 
ra guardar uma cadeia de caracte- 
res, todas recebendo um único nome 
de variável. 

Assim, podemos armazenar ca- 
deias de caracteres de qualquer com- 
primento (até um máximo de 255), 
sem nos preocupar com quantas cai- 
xinhas o computador vai usar. Isto 
ele faz automaticamente. 

LET A$ ="NABUCODONOSOR 


ERA UM REÍ ASSIRIO CRUDELIS- 
SIMO" 

LET B$ ="OLA!' 

LETC8 =" " 


(O que diz este último comando?) 
O IMPORTANTE E COLOCARMOS 
OS CARACTERES ENTRE ASPAS 
Para descobrir que a cadeia de ca- 
racteres está armazenada em uma 
variável alfabética, podemos usar o 
comando PRINT. Por exemplo, digite 
o seguinte programa no computador: 
10 LET NOMES ="MICKEY MOUSE” 
20 PRINT NOMES$;"ERA UM RATO!" 

Veja o que vai acontecer, se você 
der o comando RUN: 

Vamos entender juntos este pro- 
grama, linha a linha: 

Linha 10 > armazena a constante 
“MICKEY MOUSE” na variável 
NOMES 

Linha 20 >mostra na tela o conteú- 
do de NOMES, seguido da constante 
alfabética “ERA UM RATO!”, ambos 
na mesma linha. 


HEADS 


1, Escreva abaixo o comando que 
você daria ao computador, para ar- 
mazenar o nome do seu time de fu- 
tebol na variável chamada TIMES. 


2. O que o computador mostrará na 
tela com este programa? 

10 LET FLOR$ ="ROSA” 

20 PRINT"UMA"; FLOR$;'É UMA"; 
FLORS$ 


E o que vai acontecer, se eu trocar 
a linha 10 por: 
10 LET FLOR$ ="MARGARIDA” 


3. E este programa, o que vai mos- 
trar na tela? 
10 LET PLANETAS ="MARTE” 
20 LET PLANETAS ="JÚPITER” 
30 PRINT PLANETAS 
Explique por quê: 


4, Agora diga o que aparecerá na te-. 
la com este programa: 
10 LET COMIDAS ="ARROZ” 
20 LET ALMOÇOS ="COMIDAS 
30 PRINT"NO ALMOÇO VAI TER”; 
ALMOÇOS 
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ÚMEROS E 
NOMES PELO 
TECLADO 


DO SS 


Até agora, aprendemos a armaze- 
nar números (e nomes), dentro de um 
programa, usando o comando LET. 

Vamos fazer, por exemplo, um pro- 
grama que armazene a idade e o no- 
me de uma pessoa, em duas variá- 
veis, e depois calcule quantos dias 
ela viveu, aproximadamente. 

Este programa poderia ser assim: 

10 LET ANOS = 14 

20 LET NOMES ="ROBERTO” 
30 PRINT NOMES;"VIVEU MAIS 
DE“; ANOS + 365;“DIAS” 

Depois de digitar este programa no 
computador: 


Damos o comando RUN, para ver 
o resultado: 


O programa é muito interessante, 
mas há um problema. 

O que devemos fazer se quiser- 
mos colocar a idade e o nome de 
uma outra pessoa para fazer o mes- 
mo cálculo? 

Você já sabe a resposta: 

SEM ALTERAR A LINHA 30, DIGITA- 
MOS DE NOVO AS LINHAS 10 E 20 

Assim, por exemplo: 

10 LET ANOS = 37 
20 LET NOMES ="O PROFESSOR 

RENATO” 

O programa agora vai mostrar na 
tela: 
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O problema é pequeno, é verda- 
de, mas, se a classe toda e todos os 
amigos do seu irmãozinho quiserem 
fazer a mesma coisa, vai dar muito 
trabalho. Deve haver um jeito mais 
fácil do que ficar sempre mexendo 
no programa! 

Felizmente, este jeito existe: é o co- 
mando INPUT. 

Este comando substitui o LET, per- 
mitindo que um valor (número ou no- 
me) seja fornecido ao programa pelo 
teclado, sem haver necessidade de 
modificar o programa. 

Preste bem atenção como o progra- 
ma acima seria modificado: 

10 INPUT ANOS 
20 INPUT NOMES 

A linha 30 ficaria igual: 


O comando INPUT na linha 10 sig- 
nifica a seguinte ordem para o com- 
putador: ; 

ESPERE ALGUÉM ESCREVER UM 
NÚMERO NO TECLADO, E GUAR- 
DE-O NA VARIÁVEL ANOS 

O comando INPUT na linha 20 sig- 
nífica: E 

ESPERE ALGUÉM ESCREVER UM 
NOME NO TECLADO, E GUARDE-O 
NA VARIÁVEL NOMES 

Vamos ver agora qual o resultado 
deste programa. Digite RUN: 


O computador parou e mostrou na 
linha de baixo o cursor 

Isto não quer dizer que o programa 
não funcionou (senão apareceria 
uma mensagem de erro, ou o cursor 
K), significa que o computador encon- 
trou a linha 10, e está obedecendo ao 
comando INPUT, ou seja, parou para 
que você digite um número. 

Tudo o que você digitar vai apare- 
cer na linha onde está o cursor 


Depois de ter digitado o número 
que deseja, pressione NEW LINE ou 
ENTER. 

Note que aparece de novo o cur- 
sor L na linha de baixo, agora entre 
aspas. 

Isto significa que o computador de- 
ve estar esperando a entrada de 
uma cadeia de caracteres, na linha 
20 do programa. Digite um nome: 


e pressione a tecla NEW LINE. Agora 
o programa guardou o nome na va- 
riável correspondente, e vai para a li- 
nha 30, fazendo o cálculo e mostran- 
do o resultado: 


Entendeu? 

Para repetir o programa, basta di- 
gitar de novo a tecla RUN, e tudo se 
repete. Tente colocar várias idades e 
nomes para ver o que acontece. 

Melhor ainda, adicione ao progra- 
ma acima a linha: 

40 GOTO 10 

Desta forma, o programa ficará se 
repetindo indefinidamente. Depois 
de entrar a idade e o nome, ele vai 
mostrar o resultado na tela, e pedir 
nova idade, e assim por diante: 

ARNALDO VIVEU MAIS DE 4380 
DIAS 

JOAQUIM VIVEU MAIS DE 5110 
DIAS 

FERNANDA VIVEU MAIS DE 6570 
DIAS 

O programa só vai parar quando a 
tela ficar cheia. Neste caso, aparece 
a seguinte mensagem, na última li- 
nha da tela: 

5/30 
que quer dizer: PAREI COM A TELA 
CHEIA NA LINHA 30 


Para continuar o programa, basta 
pressionar a tecla marcada com o co- 
mando CONT (continue), que limpa 
a tela e reinicia tudo de novo na pri- 
meira linha. 

Como parar o programa antes que 
atela fique cheia? 

Experimente pressionar a 
BREAK. 

Não funciona quando o cursor 
está aparecendo, certo? 

O único jeito é pressionar a tecla 
marcada STOP, e, em seguida, a te- 
cla NEW LINE. 

Se o cursor [Lestiver entre aspas, 
só pressionar STOP não resolverá, 

E necessário antes apagar as as- 
pas da esquerda, para que o compu- 
tador não pense que o STOP é ape- 
nas uma cadeia de caracteres. 


ialogando 
com o 
Computador 


Os comandos INPUT e PRINT permi- 
tem escrever programas de CONVER- 
SAÇÃO, ou seja, uma espécie de 


tecla 


“diálogo” entre o computador e o 
usuário. 

Veja, por exemplo, este simpático 
programa: 


10 PRINT“OLA, EU SOU O MICRO- 
COMPUTADOR DE QUE MEU DONO 
TANTO FALA” 

20 PRINT 
30 PRINT"QUAL E O SEU NOME?” 
40 INPUT N$ 
50 CLS 
60 PRINT"MUITO PRAZER, "; N& 
70 PRINT'TENHO CERTEZA DE QUE 
VOCÊ VAI GOSTAR DE MIM” 
Na tela o diálogo apareceria assim: 


Você pode imaginar muitos “diálo- 
gos” como este. 
Experimente! 


a STRUTURANDO 


O PROGRAMA 


Sabendo os comandos INPUT, LET 
e PRINT, você já consegue fazer mui- 
tas coisas com o computador. Todos 
os problemas que têm a seguinte for- 
ma: 

— fornecer dados conhecidos para 
um problema 

— procurar o resultado a partir 
destes dados, usando uma ou mais 
fórmulas 

— mostrar o resultado 
podem ser programados facilmente 
em BASIC, usando o computador. 

Nesta seção, vamos aprender co- 
mo estruturar um programa deste ti- 
po, e vamos programar vários exem- 
plos e exercícios, para fixar bem a 
maneira de fazê-lo. 

Você poderá aplicar a mesma re- 
ceita para programas que você mes- 
mo vai bolar depois. 


1 ES comando 


Uma coisa muito importante para 
quem deseja aprender a fazer bons 
programas é a documentação. O 
que é isso? 

À medida que os programas que 
você faz vão ficando cada vez mais 
compridos, começa a ficar difícil en- 
tendê-los. Mesmo que tenha sido vo- 
cê que os escreveu, depois de alguns 
meses pode acontecer que não se 
lembre mais para que servem algu- 
mas partes do programa. 

A linguagem BASIC tem um co- 
mando cuja única função é ajudar o 
programador a colocar explicações 
em linguagem corrente dentro de um 
programa. Essas explicações são cha- 
madas de DOCUMENTAÇÃO INTER- 
NA DE UM PROGRAMA. 

Esse comando se chama REM. 

REM significa REMARK, em inglês, 
que quer dizer COMENTÁRIO. 

O comando REM não tem nenhu- 
ma outra serventia além de colocar li- 
nhas escritas, com alguma explica- 
ção ou comentário, dentro de um pro- 
grama. Portanto, ele não é um co- 
mando EXECUTÁVEL, ou seja, não é 
executado pelo computador, como os 
comandos LET e PRINT, por exemplo. 


O comando REM é escrito da se- 
guinte maneira: 

23 REM COMENTÁRIO 

Depois do comando REM, na mes- 
ma linha, podemos colocar o que qui- 
sermos (inclusive caracteres gráficos). 

O comando REM é útil para muita 
coisa: 

— identificar o nome do progra- 
ma, quem o escreveu, em que data 
etc. Esta parte do programa geral- 
mente é colocada no começo, e é 
chamada de CABEÇALHO DO PRO- 
GRAMA. Quando você tiver muitos 
programas gravados em fita, você sa- 
berá como esse cabeçalho é necessá- 
rio para evitar confusões... 

— verificar para que servem as va- 
riáveis dentro do programa 

— identificar as diferentes seções 
de um programa 

— colocar linhas de separação en- 
tre as partes de um programa 

Todos esses recursos são úteis para 
facilitar a leitura e o entendimento de 
um programa, tanto para você como 
para os outros. Você entenderá me- 
lhor a utilização do REM no progra- 
ma abaixo: 


PROBLEMA 

Fazer um programa para converter 

dólares em cruzeiros, à taxa do dia: 
SOLUÇÃO 
A maneira mais fácil e direta de fa- 
zer este programa seria: 
20 INPUT TAXA 
40 INPUT VALOR 
60 LET CRUZ = TAXA + VALOR 
80 PRINT CRUZ 
90 GOTO 40 

Como você percebe, o programa 
solicita apenas uma vez, na linha 20, 
a taxa atual do dólar (e a armazena 
na variável TAXA). Depois solicita a 
entrada do valor em cruzeiros (e a ar- 
mazena na variável VALOR, na li- 
nha 40). Finalmente, calcula, na li- 
nha 60, e mostra o resultado, em cru- 
zeiros, na linha 80. A linha 90 faz o 
programa perguntar o novo valor em 
cruzeiros, para ser convertido, e as- 
sim por diante, até pressionarmos a 
tecla STOP. 

Este programa é bem simples, mass 
tem as três partes fundamentais de 
qualquer programa de resolução de 
problemas: 

— ENTRADA (linhas 20 e 40) 
— CÁLCULO (linha 60) 
— SAÍDA (linha 80) 

Note que a pessoa que for usá-lo 
precisa saber para que ele serve, 
pois o programa não dá nenhuma 
“dica” sobre isto, sobre que valores 
devem ter entrada, e quando, etc. 

Por isso, um programa realmente 
útil tem comandos com mensagens 
de instruções para o usuário, e verifi- 
cação dos resultados. Veja como fica 
muito melhor assim: 
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10 PRINT'TAXA ATUAL DO DOLAR?” 
20 INPUT TAXA 

30 PRINT"VALOR EM DOLARES?” 

40 INPUT VALOR 

60 LET CRUZ = TAXA + VALOR 

80 PRINT'VALOR EM CRUZEIROS ="; 
CRUZ 

90 GOTO 30 

Veja que o programa melhora bas- 

tante, pois informa ao usuário que va- 
lores ele tem que digitar, e depois ex- 
prime o resultado com uma mensa- 
gem de esclarecimento. Na tela fica 
assim: 
para completar o nosso programa, 
vamos colocar todos os comentários 
com os comandos REM, documentan- 
do-o adequadamente: 


1 REM ee 

2 REM * PROGRAMA CONVERTE + 
3 REM « R.SABBATINI * 

4 REM + 12.SET.84 * 

5 REM «ertereeenareneentaes 

6 REM 

7 REM +** ENTRADA DE DADOS ++» 
8 REM 

10 PRINT'TAXA ATUAL DO DÓLAR?” 
20 INPUT TAXA 

25 PRINT TAXA 

30 PRINT'VALOR EM DÓLARES?” 
40 INPUT VALOR 

45 PRINT VALOR 

54 REM 

50 REM +** CÁLCULO ++ 

55 REM 

60 LET CRUZ = TAXA * VALOR 


64 REM 

65 REM +** RESULTADO +++ 

66 REM 

70 PRINT 

80 PRINT'VALOR EM CRUZEIROS ="; 
CRUZ 

90 GOTO 30 

Note que foram adicionadas as se- 
guintes linhas: 
la 5» cabeçalho 
6a8,54a55e64 ab 
ção das seções 
25 e 45 À) mostram na tela os valo- 
res de entrada, para melhor referên- 
cia 
O programa acima é bastante legí- 

vel e de fácil modificação, mesmo 
por quem não o desenvolveu. As se- 
ções de entrada, cálculo e saída são 
facilmente identificáveis. 


à identifica- 


onclusões 
sobre o REM 


| 


O comando REM é muito útil, como 
você viu. 
Entretanto existem algumas coisas 


Jo 


. de que precisamos lembrar, quando 


formos usá-lo: 

1. O comando REM não é uma or- 
dem para o computador. Tudo o que 
estiver escrito nele (inclusive coman- 
dos válidos em BASIC) fica como que 
invisível para o computador e visível 
só para você. 


2. Os comandos REM ocupam espa- 
ço de memória no computador. Se o 
programa for muito longo e não cou- 


8.1, Defina: 
VARIÁVEL 


8.2. Qual é a vantagem principal de 
se utilizar variáveis em um progra- 


8.4. Marque com V se a afirmativa 
for verdadeira, e com F, se for falsa: 
() o comando REM é interpretado e 
executado pelo computador 
() os comandos REM de um progra- 
ma não ocupam a memória 
() o comando INPUT pode ser usa- 
do sem uma variável 
() o comando INPUT pode ser usado 
entrada de números e nomes 
() quando o computador encontra 
um comando INPUT, interrompe O 
processamento de um programa € 
fica esperando uma entrada 
() o comando INPUT solicita dados 
pelo teclado 
() o comando LET serve apenas pa- 
ra fazer cálculos 


8.5. Assinale quais os nomes de va- 
riáveis que são corretos (C) e erra- 
dos (E) e explique por quê: 
TK 85 
1983 
ABCDI23 
COISAS 


TESTE 


ber na memória, é necessário limitar 
o número de REMs ou tirá-los. 


3. Se você vai desenvolver um pro- 
grama muito longo, tome como hábi- 
to ir escrevendo os comentários REM 
em seu interior à medida que vai di- 
gitando as linhas de comandos. ” 


4. Os comentários REM não são a 
única forma de documentação. De- 
pois veremos outras. 


COISSA 


8.6. Que resultado vai mostrar O 
computador no programa abaixo? 
(Explique por que, para cada linha 
PRINT): 


70 PRINT A,C,D 


8.7. Escreva um programa que per- 
gunte o seu nome e depois encha a 
tela com ele. 


8.8. Faça um programa para entra- 
da de três notas pelo teclado, e de- 
pois calcule a soma e a média sim- 
ples das notas. Coloque também o 
nome do aluno. 


8.9. Qual é a vantagem principal de 
se usar o comando INPUT em um 
programa em BASIC? 


8.10. Cite três utilidades do coman- 
do REM em um programa: 
E 
2. 
3. 


8.11. Quais são as três partes princi- 
pais de um programa para resolver 
um problema de cálculo? 


Rap OLUÇÃO DOS PROGRAMAS PROPOSTOS 
as 


Abaixo, a solução dos programas propostos no capítulo 5 deste livro. 


TRE 


PÁGINA 21 
6.12. Faça um programa para colocar na 
tela uma lista numerada de três times de 
futebol. Por exemplo: 

1 PALMEIRAS 

2 BOTAFOGO 

3 FLAMENGO 


Resposta: 


10 PRINT “1”, “PALMEIRAS” 

“20 PRINT “2”, “BOTAFOGO” 
36 PRINT “3”, “FLAMENGO” 
40 STOP 


6.13. Faça um programa para colocar um 
sinal + em cada canto da tela (dica: use o 
comando PRINT AT). 


EXER RAS 


PÁGINA 23 

1. Faça um programa para colocar na tela 
as palavras TIC e TAC, uma em cada li- 
nha, até encher toda a tela. 


Resposta: 


16 PRINT “TIC” 
20 PRINT “TAC” 
“30 GOTO 16 


PÁGINA 30 
8.7, Escreva um programa que pergunte o 
seu nome, e depois encha a tela com ele. 


Resposta: 


16 PRINT “QUAL É O SEU NOME?” 
“2d INPUT NOME $ 

30 CLS 

4) PRINT NOME $; “ "': 

50 GOTO 46 


8.8. Faça um programa para entrada de 
três notas pelo teclado, e depois calcule a 
soma e a média simples das notas. Colo- 
que também o nome do aluno. 


Resposta: 


10 REM +rataseannanaanaaas 
20 REM * MEDIA DE 3 NOTAS + 


50 REM +** ENTRADA DAS NOTAS +++ 


2. Modifique o programa acima para es- 
crever em toda a tela, mas com as pala- 
vras TIC e TAC unidas. 


Resposta: 


10 PRINT “TIC” 
20 PRINT “TAC” 
30 GOTO 1d 


$1 EK 


6d REM 

65 PRINT “CALCULO DE MEDIA” 

68 PRINT 

70 PRINT “ENTRE 3 NOTAS:” 

8d INPUT N1 

94 PRINT “NOTA 1 =; N1 

109 INPUT N2 

116 PRINT “NOTA 2 = "; N2 

115 INPUT N3 

120 PRINT “NOTA 3” = ; N3 

130 REM 

146 REM ++* CALCULA SOMA E 
MED: ... 

154 REM 

160 LET SOMA = N1 + N2 + N3 

17Ó LET MEDIA = SOMA/3 

180 REM 

190 REM *** MOSTRA RESULTADO * ** 


220 PRINT “SOMA = "; SOMA 
230 PRINT “MEDIA = ”; MEDIA 
240 STOP 
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Exemplo de execução: 


digite a 1? nota digite a 3º nota 


digite a 2º nota resultados 
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fuma DE CÓDIGOS INDICADORES DE ERROS 


Apresentamos abaixo uma tabela completa com to- 
dos os códigos indicadores de erros que podem apa- 
recer durante a digitação ou a execução de um pro- 
grama. Lembre-se que este código sempre aparece na 
linha de baixo da tela mostrando também o número da 
linha em que ele ocorreu. Exemplo: 


5/15 


Significa: ocorreu o erro número 5, na linha 15. 

O erro número 5 significa: não há mais espaço na 
tela para continuar a listagem. Na coluna SITUA- 
ÇÕES você poderá ver com quais comandos pode 
ocorrer este erro. No nosso exemplo, pode ocorrer 
com PRINT, LIST etc. 

Algumas vezes, a tabela também indica o que fazer 
para sair do erro. No caso do erro número 5, você de- 
verá digitar o comando CONT para limpar a tela. 


CÓDIGO SIGNIFICADO SITUAÇÕES 


Não houve erro. Qualquer 
Execução bem sucedida ou salto 

para uma linha de maior número 

que qualquer outra existente. 


1 A variável de controle não existe NEXT 
(não foi estabelecida por uma 
instrução FOR), mas existe uma 
outra variável com o mesmo no- 
me. 


Qualquer 


À linha indicada usa uma variá- 
vél não definida previamente por 
uma instrução LET ou INPUT 
Para matrizes isso acontecerá se 
estas forem usadas antes de ser 
dimensionadas pela instrução 
DIM. E, para uma variável de 
controle, isso ocorrerá caso ela 
for usada antes de ter sido defini- 
da como variável de controle por 
uma instrução FOR, e se -não 
houver nenhuma variável sim- 
ples com o mesmo nome. 


A matriz não contém o elemento Matrizes 
especificado. 

Caso o índice esteja fora de faixa 

(isto é, seja negativo ou acima de 

65535), ocorrerá o erro B. 


Espaço insuficiente na memória. LET, INPUT, 
Observe que o número de linha DIM, PRINT, 
na indicação (após o /) poderá LIST, PLOT, 
estar incompleto na tela, devido UNPLOT, FOR, 
à falta de memória; assim, por GOSUB. 


Às vezes, durante 
a avaliação de 
funções. 


exemplo, 4/20 poderá surgir co- 
mo 4/2. 
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SIGNIFICADO 


Não há mais espaço na tela. 
CONT criará espaço, limpando a 


CÓDIGO 
5a 


PRINT, LIST, 
PLOT, UNPLOT. 


Resultado fora dos limites do 
computador. Os cálculos produ- 
ziram um número superior a 
1038, 


Qualquer cálculo 
aritmético. 


RETURN sem um GOSUB cor- 


7 
E” respondente. 
Você tentou um comando INPUT INPUT 
não permitido. 
Instrução STOP executada. STOP 
CONT fará a execução começa 
da próxima linha. 
Argumento inválido para certas 
funções. 


Número inteiro fora da faixa 
(—655 34 a 65535). 


CHR$, PEEK, 
USR. Quando de 
um acesso a uma 
matriz 


O texto do argumento (de string) 
de VAL não forma uma expres- 
são numérica válida. 


Ao fim de qual- 
quer instrução ou 
em LOAD, SAVE, 
PRINT, LIST ou 
COPY. 


Programa interrompido por: 
1. Tecla BREAK pressionada ou 
2. Um STOP foi digitado no te- 


O nome fornecido para o pro- 
grama está em branco 


RESUMO 


Vamos rever agora todos os comandos e instruções que você aprendeu até aqui, 
em ordem alfabética, para facilitar o seu trabalho posterior. 


Na relação abaixo, 

V representa uma variável; 

n representa expressão numérica que é arrendondada para o número inteiro mais 
próximo; 

e representa uma expressão. 


| Note que expressões arbitrárias são permitidas em qualquer lugar, exceto para nú- 
mero de linha no início da instrução. 
Todas as instruções, exceto INPUT, podem ser usadas tanto em linhas imediatas co- 
mo em linhas de comando. 


CONT Continua a execução após um BREAK ou STOP. Normalmente é di- 
gitado pelo teclado (não é colocado dentro de um programa). 


CLS Limpa a tela. 


Salta para linha n (ou, se não existe, para a que vem depois dela). 
Exemplo: GOTO 20 


Pára e espera que seja feita uma entrada de dados. 

É não pode ser usado diretamente pelo teclado, pois ocorrerá 
erro 6. 
Se o primeiro caractere em uma linha de INPUT é STOP, o progra- 
ma pára com denotação D. Exemplo: INPUT A$. 


Atribui o valor e à variável v. LET não pode ser omitido. Uma variá- 
vel simples é indefinida, até figurar em uma instrução LET ou 


Exemplo: 
LET X=A+25/3 
“Lista o programa na tela, começando na 1º linha. 


Lista o programa na tela, começando na linha n. Ocorrem erros 4 ou 
5, se a listagem for muito longa para a tela. Exemplo: LIST 


Apaga o programa e todas as variáveis, para poder colocar outro na 
memória. 


Mostra algo na tela (o que estiver indicado depois da palavra 
PRINT), e que é chamado item de impressão. 


item pode ser: 
(1) Vazio, isto é, nada “ee . Neste caso é mostrada na tela 
uma linha em branco. k 

(2) Uma expressão numérica. É mostrado o resultado da expressão. 
Exemplo: PRINT 25+ 14 

O resultado é impresso em notação decimal ordinária de até 8 dígitos 
significativos e sem zeros após o ponto decimal. Um ponto decimal 
no início é sempre seguido de um zero. 

(3) Uma exp: entre . É mostrado exatamente o que apare- ' 
ce. Exersplos PRINT "BOM DIA”, 

(4) ATmn A posição de impressão é mudada para linha.m (con- 
tando do topo), coluna n (contando da esquerda). Se Iml = 22 ou 23, 
resulta erro 5 

(5) TAB n 


A posição de impressão é movida para coluna n, permanecendo na 
mesma linha, a menos que isso envolva retorno na mesma linha; nes- 
na ea , move-se para a próxima linha. Exemplo: PRINT AT 10, 20, 
Um ponto e vírgula entre dois itens imobiliza a posição de impres- 
são, de forma que o segundo item siga logo após o primeiro. 


Exemplo: 
PRINT “A=; 25 

Uma vírgula, por outro lado, move a posição de impressão de, no 
mínimo, um lugar; e, após isso, tantos quantos forem necessários pa- 
ra deixá-la na coluna O ou 16, introduzindo uma nova linha, se ne- 
cessário. Exemplo: PRINT “JOÃO”, “MARIA” 

Ao fim de uma instrução PRINT, se ela não terminar por ponto e vír- 
gula ou virgula, uma nova linha será colocada. 

Erro 4 (fora da memória) pode ocorrer com 3k ou menos memória. 
Erro 5 significa que a tela está repleta. 

Em ambos os casos, a solução é digitar CONT, que limpará a tela e 
continuará. 


REM... Identifica comentários em um programa. (Abrev. REMark); ignora o 
restante da linha. 


RUN Executa um programa a partir da primeira linha. 

RUN n Executa um programa a partir da linha m. Exemplo: RUN 20 
STOP Interrompe a execução do programa, mostrando a mensagem 9. 
INT n Função para obter a parte inteira de um número. Exemplo: PRINT 


INT 23.5 (sempre arredondando para menos). 
LEN String Comprimento da string. 
LN Número Logaritimo natural (na base e). Erro À se x < 0;0sex% O; 


lsex=0 

NOT tem prioridade 4. 
PI Função que retorna o valor do número (3,14159265...). 
SGN n Função que determina o sinal de um número. 


Resultado 


Exemplo: 
LET X = SGN (-25) 


Calcula a raiz quadrada do número n. Exemplo: PRINT SQR (24). 
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Co A Pi 


TU LO. 6 


dd 

COMPUTADOR 

TAMBÉM SABE 
DECIDIR 


Até agora, você aprendeu como 
programar o computador para: 


Programa Comando 
entrada de dados: INPUT 
cáculos: LET 
resultados na tela: PRINT 


Estes comandos são muito úteis 
para fazer uma infinidade de 
programas. Com elas, podemos 
transformar o computador em uma 
sofisticada calculadora 
matemática, capaz de resolver 
problemas de cálculo de muitos 
tipos. 

Entretanto, o computador pode 
fazer muito mais do que isso. Ele 
pode, por exemplo, aprender a 
tomar decisões sozinho! 


O comando que permite fazer 
isto em BASIC se denomina IF. 
Em inglês, IF significa SE (ou seja, 
expressa uma determinada 
condicão). Por exemplo: 


300 IF X = O THEN PRINT 
“O NUMERO E IGUAL A ZERO” 


Este comando está dando a 
seguinte ordem para o 
computador: 


SE o número X for igual a 0, 
ENTÃO imprima a mensagem. 


A palavra THEN significa 
ENTÃO, em inglês, e é sempre 
usada em conjunto com o IF. 


O comando IF manda o 
computador tomar uma decisão 
muito simples. Ele ordena o 
computador a fazer uma 
determinada operação, se a 
condição testada for verdadeira. 


No exemplo acima, se o número 
contido na variável X for igual a 


0, a condição testada (X = 0) 
será verdadeira, e o computador 
mostrará na tela a mensagem: 


O NUMERO E IGUAL A ZERO 


E se a condição não for 
verdadeira? 


Então o computador não 
obedecerá a instrução PRINT na 


linha 300 e passará para a linha 
seguinte do progama: 


a condição 


300 [IF X] = O THEN => PRINT: "NUMERO E IGUAL A ZERO” 


y 


siga este caminho, se 
a condição for falsa 


siga este caminho, se 
a condição for verdadeira 


Para entender melhor, seria 
como se você estivesse andado 


por uma estrada e engana a 
uma enc 


PRINT “O NUMERO E ZERO” 


linha seguinte 
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Você tem dois caminhos para 
seguir, dependendo da decisão 
que tomar. Se o que estiver escrito 
na placa é verdadeiro, vá para a 
direita. Se for falso, vá para a 
esquerda+ 


Vamos ver agora um programa 
bem simples, para mostrar como 
funciona o comando IF numa 
situação real. Neste programa, a 
pessoa digita um número qualquer 
no teclado, e o computador 
informa se ele é zero, positivo ou 
negativo. 


10 REM — PROGRAMA PARA TESTAR SE UM NUMERO 
20 REM — E ZERO, POSITIVO OU NEGATIVO ; 


60 REM 


70 PRINT “ENTRE UM NUMERO E EU DIGO QUE SINAL ELE” 


80 PRINT "TEM" 
90 INPUT X 
100 REM 


110 REM — TESTA O NUMERO 


120 REM 
125 PRINT 


130 IF X = O THEN PRINT “O NUMERO E ZERO" 
140 IF X > O THEN PRINT “O NUMERO "X;” POSITIVO” 
150 IF X< O THEN PRINT “O NUMERO "“;X;” E NEGATIVO” 


160 PRINT 
170 GOTO 90 


Vamos ver como funciona este 
programa. Depois de digitar o 


comando RUN, aparece na tela 


Então, se eu digitar, por exemplo, c 
número - 9: 


E o computador responde: 


E assim por diante. 


Para interromper o programa, 
podemos pressionar a tecla STOP 


Outro uso bastante comum do 
IF é para assinalar quando uma 
determinada parte de um 
programa deve ser terminada e 
outra parte deve ser iniciada. 


Veja o programa abaixo: 


10 REM — MAQUINA DE SOMAR 


20 REM 
30 REM 
40 REM — INSTRUCOES 
50 REM 


60 PRINT “DIGITE OS NUMEROS QUE QUISER SOMAR” 
70 PRINT “TODA VEZ QUE APARECER A LETRA L NA” 
80 PRINT “PARTE DE BAIXO DA TELA” 


90 PRINT 


100 PRINT “PARA OBTER A SOMA, DIGITE 0” 


110 PRINT 
120 REM 


130 REM — ZERA O SOMADOR 


140 REM 
150 LET SOMA = 0 
160 REM 


170 REM — ENTRADA DA PARCELA 


180 REM 
190 INPUT D 
200 REM 


210 REM — SE FOR ZERO, PULA PARA 350 


220 REM 


230 IF D = O THEN GOTO 350 


240 REM 


250 REM — SE NÃO FOR, SOMA O DADO 


260 REM 
265 PRINT D 


270 LET SOMA = SOMA + D 


280 REM 


290 REM — E VOLTA A 190 DE NOVO 


300 REM 
310 GOTO 190 
320 REM 


330 REM — FIM DA ENTRADA. MOSTRA SOMA 


340 REM 
350 PRINT 


360 PRINT "SOMA = “SOMA 


370 STOP 


O programa funciona como uma 
máquina de somar. O número de 
parcelas a serem somadas não é 
conhecido de antemão. Assim, a 
parte do programa entre as linhas 
190 e 310 forma uma alça de repe- 
tição, que serve para pedir os valo- 
res para o usuário (através do co- 
mando INPUT, na linha 190), e so- 
má-los usando o contador SOMA. 


Para interromper esta alça, 
quando todos os números tiverem 
sido digitados, tenho que informar 
isso de algum modo ao computa- 
dor. Poderíamos, neste caso, digi- 
tar o número zero. Um teste, den- 
tro do programa, desvia o proces- 
samento para outra parte (linha 
350 a 370), que vai mostrar o resul- 
tado. 


Vamos ver um exemplo de utili- 
zação do programa: 


Se eu digitar os números 12, 7, 
15 e 35, um após o outro (pressio- 
nando a tecla NEW LINE ou EN- 
TER, após cada um), teremos a se- 
guinte tela: 


Agora, se quisermos terminar 
esta parte do programa e vero re- 
sultado da soma (linhas 350 a 370), 
vamos digitar O e ocorrerá o se- 
guinte: 


Veja quais seriam os números ar- 
mazenados nas variáveis D e SO- 
MA, no exemplo acima. 


Número Variável | Variável” 
digitado D SOMA 

12 12 ia 
q 7 19 
15 Es! "34 
38 35 69 
0 0 169 

e acaba... 
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Se eu não tivesse a linha de teste 
com o IF, seria impossível dizer ao 
computador quando ele deveria 
mostrar o resultado da SOMA. 


a 


Note como funciona a linha de 
teste 


230 IF D = O THEN GOTO 350 


Esta frase tem o seguinte signifi- 
cado em português: 


Se o valor de D for igual a zero, 
ENTÃO vá para 350. 


Quando o computador encontra 
esta linha de programa, o que fará 
ele? 


1. Compara o número armazenado 
na variável D com zero; 


2. se este número for igual a zero, 
então obedece o comando que está 
na mesma linha que o IF, logo de- 
pois do THEN, ou seja, GOTO 350; 


3. se este número não for igual a 
zero, continua seguindo o progra- 
ma, a partir da linha seguinte (ou 
seja, a linha 240). 


Mais usos para o IF 


O comando IF é interessante 
porque permite testar informações 
de muitas maneiras diferentes. Ele 
permite, por exemplo, verificar se 
a resposta a uma pergunta feita ao 
computador está correta ou não. 


Vamos entender como funciona 
este programa, passo a passo: 


— linha 60: o programa mostra a 
pergunta, no alto da tela 


— linha 70: fica esperando a res- 
posta digitada no teclado, e a 
guarda na variável chamada 


RESPOSTAS 


— linha 110: compara o que está 
em RESPOSTAS com a constan- 
te ROMA. 


Se for verdadeiro, ou seja, se a 
pessoa digitou ROMA, ENTÃO pu- 
la para a linha n. 200, para dar os 
parabéns. 


— linha 150 a 160: limpa a tela 
(CLS), diz que errou, e mostra a 
resposta correta. Depois pára, 
interrompe o programa. 


— linha 200 a 220: limpa a tela, e 
dá os parabéns. Depois inter- 
rompe o programa. 


Como funciona o comando IF? 


Com os exemplos acima, já po- 
demos deduzir alguns princípios 
sobre o funcionamento do coman- 


do IF: 


— uma linha com o comando IF é 
composta de quatro partes: 


1. a palavra IF 


2. uma comparação entre duas coi- 
sas 


3. a palavra THEN 


4. uma linha com um comando que 
deve ser executado, se o resulta- 
do da comparação for VERDA- 
DEIRO 


As palavras IF e THEN são fixas, 
ou seja, sempre devem constar na 


Vamos ver o que o BASIC permi- 
te que coloquemos nos itens 2 e 4. 
O item 2 é chamado de CONDI- 
ÇÃO, ou ainda de CLÁUSULA 
LÓGICA. 
O item 4 é chamado de AÇÃO 
ou CONSEQUÊNCIA. 


A condição 

Em geral, a cláusula lógica é es- 
crita de tal forma que permita uma 
comparação. 


Por exemplo: 
IFX = 5 THEN... 


testa se o valor da variável numéri- 
caXéiguala5 


IFA > BTHEN... 


testa se o valor da variável numéri- 
ca À é maior do que o valor da va- 
riável numérica B 


IF13 + (25-3)/2 <CTHEN... 


testa se a expressão aritmética à es- 
querda é menor do que o valor da 
variável numérica C 


IF R$ = “SIM” THEN ... 


testa se a palavra armazenada na 
variável alfanumérica R$ é igual à 
constante alfanumérica SIM 


Só existem dois resultados possi- 
veis para uma expressão lógica: 
verdadeiro ou falso. 


Se a EXPRESSÃO resulta VER- 
DADEIRA, a AÇÃO é executada. 

Se a EXPRESSÃO resulta FAL- 
SA, a AÇÃO não é executada. 


Os sinais de igual (=), maior (>) 
e menor (<) são chamados de ope- 
rações relacionais, ou seja, permi- 
tem formar uma expressão que con- 
tenha uma igualdade ou uma desi- 
gualdade (como na matemática). 


As seguintes ope Eee relacio- 
nais são permitidas em BASIC: 


igual 

menor que 

maior que 

menor ou igual a 
maior ou igual a 
diferente-de (não é 
igual) 


AVAVAM 


Vuu 


Para digitar estas operações no 
teclado, note que existe algumas te- 
clas rotuladas com estes sinais: 


teclaL = 
tecla N < 
ba tecla M > 
teclaR < = 
tecla Y | > = 


tecla T <> 


Para entrar a operação, mante- 
nha pressionada a tecla SHIFT, en- 
quanto pressiona a tecla correspon- 
dente ao sinal desejado. 


Preste atenção em uma coisa: vai 


'haver erro se você tentar obter o si- 


nal > = pressionando a tecla > e 
depois a tecla =. 


Este sinal só pode ser obtido cor- 
retamente por meio de sua tecla es- 
pecial, e assim todos os outros. 


Uma comparação lógica deve 
sempre ter variáveis ou constantes 
do mesmo tipo, na mesma expres- 
são. Caso contrário, ocorrerá erro. 


Por exemplo: 


IF COMIDA = 


não está correto, porque estamos 
tentando comparar uma variável 
numérica com uma constante alfa- 
bética. 


“BATATA” 


Ou então: 
IFX$ > 24 THEN... 


também não dará certo, porque es- 
tamos colocando na mesma expres- 
são lógica uma variável alfanuméri- 
ca e uma constante numérica. 


A ação 


O que vem na mesma linha do IF, 
logo depois da expressão lógica, é a 
ação ou consegiiência a ser seguida, 
se ela for verdadeira. 


No BASIC do TK-85, bem como no 
de todos os outros microcomputadores 
compatíveis com a linha Sinclair, a 
ação pode ser qualquer comando váli- 
doem BASIC: 


Você já conhece alguns, que podem 
ser colocados sem problemas depois 
de um comando IF: 


são os mais usados. 


Eis aqui alguns exemplos: 


IF SEXO$ = “FEMININO” THEN 
GOTO 300 

IF T 20 > THEN STOP 

IF S<O THEN PRINT “O NUMERO 
E NEGATIVO” 

IF R <> 2 THEN INPUT P$ 

IF ANOS = “BISSEXTO” THEN LET 
DIAS = 366 

IF LINHAS > 20 THEN CLS 


IF FIM = O THEN RUN 


Vamos ver mais alguns eXemplos do 
uso do comando IF: 


EXEMPLO 1: um programa'para xin- 
gar uma pessoa! 
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Como vai ser o resultado deste pro- 
grama? 


O que acontecerá se a pessoa digi- 
tar de uma forma errada o sexo, ou se- 
ja, se não for exatamente iguala MAS. 
CULINO ou FEMININO? 


Exemplo 2: programa para cálculc 
de raiz quadrada. 


Vamos supor que queremos fazer 
um programa para calcular a raiz qua- 
drada de um número qualquer. Que- 
remos que o programa funcione assim: 
primeiro, a pessoa digita no teclado o 
número que desejar. Depois, o pro- 
grama calcula a raiz quadrada e mos- 
tra o resultado na tela. Em seguida, 
pede outro número à pessoa, e assim 
por diante. 


É muito fácil entender como funcio- 


na o programa: 

— nas linhas 90 E 100, o programa so- 
licita o número a ser calculado; 

— na linha 110, o número digitado é 
impresso na mesma linha; 

— nas linhas 140 e 150, o programa 
calcula e mostra a raiz quadrada; 

— na linha 190, o programa é desvia- 
do para o comando INPUT, de modo a 
possibilitar novo cálculo. 


O GOTO 90 na linha 190 cria uma 
“alça sem fim”, ou seja, o programa 
sempre vai se repetir, infinitamente. 
Quando você quiser parar de utilizar o 
programa, basta pressionar a tecla 
STOP, com o programa na linha 90, ou 
pressionar a tecla BREAK, quando ele 
estiver calculando. Isto você já apren- 
deu. 


O programa ficaria muito melhor, 
entretanto, se não fosse necessário 
pressionar estas teclas para 
interrompê-lo. Poderíamos fazer com 
que o computador “soubesse” quando 
deveria parar. 


Uma sugestão interessante seria es- 
ta:-se a pessoa entrar um valor deter- 
minado (por exemplo, zero), o progra- 
ma parará automaticamente. 


Para isto, precisamos testar se o va- 


lor armazenado na variável de entrada 
D é igual a zero, certo? 
105 IF D = O THEN STOP 


Agora, nosso programa ficará as- 
sim: 


10 REM - PROGRAMA PARA CALCULAR RAIZ QUADRADA 
20 REM - PARA O COMPUTADOR TK - 85 


30 REM 
40 REM 


50 REM — ENTRADA DE UM NUMERO 


60 REM 


70 PRINT "CALCULO DA RAIZ QUADRADA” 


BOPRINT"========= 


102 REM — TESTA SE O VALOR E ZERO 


103 REM 
105IFD = O THEN STOP 
115 REM 


120 REM — CALCULO E IMPRESSAO 


130 REM 
140LETR = SOR(D) 


150 PRINT “RAIZ QUADRADA = ":R 


160 REM 

170 REM — VOLTA PARA O COMECO, PARA 
OUTRO NUMERO 

180 REM 


Agora parece que o programa já es- 
tá bom, mas existe ainda outro proble- 
minha a ser resolvido. 


Não existe a raiz quadrada de um 
número negativo. 


Assim, se você digitar o número -5, 
por exemplo, o programa será inter- 
rompido, e aparecerá a seguinte men- 
sagem de erro: 


Isto quer dizer que a função na linha 
indicada (140) foi usada com um argu- 
mento (isto é, dado de entrada) indevi- 
do ou errado (não permitido ou impos- 
sível de ser calculado). 


Não é conveniente deixar ocorrer 
este tipo de interrupção em um pro- 
grama, porque às vezes a pessoa que 
está operando não sabe o que significa 
aquela mensagem de erro nem como 
voltar a utilizar o programa. 


O ideal é que o próprio programa se 
encarregue de verificar se o número 
digitado pode ou não ser usado. 


Para que façamos isto, é necessário 
realizar um teste. No nosso exemplo, 
teriamos que testar, dentro do progra- 
ma, se o número digitado pela pessoa 
é válido ou não. 


Se o número fosse incorreto, o pro- 
grama poderia mostrar uma mensa- 
gem de advertência (por exemplo: 
NÃO PODE SER UM NUMERO NE- 
GATIVO, ou outra qualquer). 


Por exemplo, poderíamos colocar 
em nosso programa a seguinte linha, 
logo após aquela que serve para entrar 
o número a ser calculado (linha 100, 
com o comando 


1091F D < O THEN GOTO 250 


Esta linha permitirá interceptar to- 
dos os números negativos. Se a cláusu- 
la 


D<o 


for verdadeira, o programa pulará 
para a linha 250, onde será mostrada 
uma mensagem de advertência, para 
indicar o erro cometido. 


Se ela for falsa (ou seja, o número é 
maior do que zero), o programa pulará 
para a linha seguinte (110), e o restan- 
te do cálculo será realizado. 


Agora, com todas as modificações, 
nosso programa ficará assim: 


E) 


10 REM- PROGRAMA PARA CALCULAR RAIZQUADRADA 
20 REM - PARA O COMPUTADOR TK - 85 

30 REM 

40 REM 

50 REM — ENTRADA DE UM NUMERO 

60 REM 

70 PRINT “CALCULO DA RAIZ QUADRADA” 


S0PRINL'S=====5=>=SDess== sans 


102 REM — TESTA SE O VALOR E ZERO 
103 REM 

1051FD = O THENSTOP 

106 REM 

107 REM — TESTA SE O VALOR E NEGATIVO 
108 REM | 
109 IF D<0 THEN GOTO 250 
NOPRINTD; 

115 REM 

120 REM — CALCULO E IMPRESSAO 
130 REM 

140LETR = SOR(D) 

150 PRINT “RAIZ QUADRADA = ";R 
160 REM 


170 REM — VOLTA PARA O COMECO, PARA OUTRO NUMERO 


180 REM 

190 GOTO 90 

200 REM 

210 REM — MENSAGEM DE ERRO 

220 REM 

250 PRINT “NAO PODE SER UM NUMERO NEGATIVO” 
260 GOTO 90 


Coloque este programa no compu- 
tador e teste com alguns números posi- 
tivos e negativos para ver se ele fun- 
ciona. 


7. Faça um programa para testar se o 
resultado da divisão de um número 
por outro tem resto maior do que ze- 
To. 


Dica: 10 INPUT N1 
20 INPUT N2 
30 LET D=NI1/N2 
ag IF... 
Use a função INT (inteiro de) para 
verificar. 


8. Explique o que faz o programa 
abaixo com os valores de entrada (A e 
B) indicados. 


10 INPUT A 

20 INPUT B 

3 LET N=0 

40 LETN=N+1 

50 IF N=B THEN STOP 

60 LET A=A+2 

70 PRINT A; “ "; 

80 GOTO 40 

Valores: a - A=2, B=5 
b-A=4,B=1 
c-A=0, B=10 
d-A=1,B=1 


9, Estude o programa abaixo e escre- 
va as mensagens que serão escritas na 
tela quando o programa for executa- 
do: 


10 PRINT “CURSO DE PROGRAMA- 
ÇÃO BASIC” 

29 GOTO 75 

Ene “EDITORA ABRIL CULTU- 
40 PRINT 

50 GOTO 140 

60 PRINT "BASIC E MUITO FACIL” 
70 GOTO 90 

75 PRINT “APRENDER”; 

80 GOTO 60 

9 LET A=8 

100 IF A=8 THEN 110 

Eh PRINT "BASIC E MUITO DIFI- 
110 STOP 

140 PRINT “FIM DA MENSAGEM” 


Responda também: quais são as li- 
nhas do programa que nunca serão 
executadas. Por quê? 


jo. F aça um programa que imprima 
na tela os números de 10 a 20. 


Ni 


Como vimos na primeira parte des- 
te capítulo, um dos usos principais 
para o comando IF é observado na 
contagem e repetição de certos seg- 
mentos de um programa (ou seja, o 
que chamamos de alças de repetição). 

Para isto, ele é empregado em con- 
junto com uma variável chamada 
acumuladora ou contadora, que ser- 
ve para registrar quantas vezes cada 
coisa foi repetida. 

Por exemplo: um programa para 
contar de 1 a 10, mostrando na tela o 
seguinte resultado: 


poderia ser programado da seguinte 
maneira: 


I0 LETN=0 

20 LETN=N+1 

30 PRINT N;º ”; 

40 IF N< 10 THEN GOTO 20 
50 PRINT “FIM” 


Vamos entender melhor como funciona este programa: 


10 LET N=0 


20 LETN=N+1 


30 PRINT N;" "; 


40 IF N<10 THEN GOTO 20 


50 PRINT “FIM” 


N será a variável contadora. Por isso, 
devemos inicializá-la (no caso, igualá-la a 
zero). Isto deve ser feito antes de se come- 
gar a alça de repetição. 


Aqui é o começo da alça de repetição. 
Somamos 1 ao valor anterior armazenado 
em N (isto é, incrementamos ou acumula- 
mos o valor da contadora N). 


Agui imprimimos o valor atualizado de 
N, que será maior cada vez que a alça for 
repetida. 


Este é o fim da alça de repetição. Testa- 
mos se o valor incrementado na variável 
N já atingiu 10. Se ainda não tiver atingi- 
do, volta-se para a linha 20, para nova re- 
petição. 


Se o testé IF da linha anterior não for 
verdadeiro, ou seja, se N for igual ou 
maior do que 10, então o programa sai da 
alça e encerra o processamento, impri- 
mindo FIM. ) 


Portanto, vemos que este progra- 
ma tem três partes: 


== inicialização 
JO LET N=0 (antes da alça) 


aqui, tudo 
é repetido 
10 vezes 


50 PRINT “FIM” final da alça 
. 
. 


e 
se quisermos, poderemos acrescentar 
outros comandos, fora da alça. 


Note que este programa poderia ser 
escrito de muitas outras maneiras, 
com exatamente o mesmo resultado, 
em termos de processamento: 


A) IO LETN=QO 
20 IF N>10 THEN 60 
30 LETN=N+1 
40 PRINT N;“”; 
50 GOTO 20 
60 PRINT “FIM” 


B) IO LETN=1 
20 PRINT N;“ "; 
30 LETN=N+1 
40 IF N<=10 THEN 20 
50 PRINT “FIM” 


C) 10 LET N=1 
20 IF N>10 THEN 50 
30 PRINT N;“ ”; 
35 LETN=N+1 
40 GOTO 20 
50 PRINT “FIM” 


Na variante À, o teste é feito antes do 
incremento. À variável contadora é igua- 
lada a zero na inicialização, por isso, a 
impressão (PRINT) tem que ser feita de- 
pois do incremento (N=N+1). 


Na variante B, a contadora é igualada 
a 1. Por isso, primeiro devemos imprimir 
seu conteúdo para somente depois in- 
crementá-lo. Neste exemplo, o teste é fei- 
to no final da alça. 


NavarianteC, temos umamisturadé A 
e B: oteste é feito no início da alça, mas 
a contadora é igualada a 1 também no 
início. 


Como essas, você poderia imaginar 
ainda um grande número de combina- 
ções das linhas, obtendo o mesmo resul- 
tado. Por isso, quase nunca existe uma 
única solução para um programa: várias 
soluções podem levar ao mesmo resul- 
tado. 


Mas cuidado: um pequeno erro no 
operador relacional, ou na ordem de co- 
locação das linhas, pode levar a um re- 


e) 


sultado diferente do esperado. Por 
exemplo: 


10 PRINT N=0 

20 IFN > 10 THEN GOTO 60 
30 PRINT N;""; 

40 LETN=N+1 

50 GOTO 20 

60 PRINT “FIM” 


imprimirá 10 números, conforme o pre- 
visto, porém o fará de 0a 9. Experimente! 


Que linha você mudaria para obter 
um resultado correto? 


Modificando ligeiramente a lógica do 
programa acima, podemos fazê-lo con- 
tar de 2em 2, de 3em 3 etc. 


Por exemplo, queremos fazer com que 
o programa imprima todos os números 
pares de 2 a 10: 


10 LETN=0 

20 LETN=N+2 

30 PRINT N;""; 

49 IFN< 10 THEN GOTO 20 
50 PRINT “FIM” 


Na tela, será apresentado o seguinte 
resultado: 


Para obter os números ímpares de 1 a 9, 
bastariam estas mudanças: 


10 LET N=1 

20 PRINT N;* "; 

30 LETN=N+2 

40 IF N<9 THEN GOTO 20 
50 PRINT “FIM” 


Obteríamos o seguinte resultado: 


Portanto, podemos ver claramente que 
todo programa de repetição controlada 
de alças (isto é, através de um certo nú- 
mero fixo de repetições), tem sempre os 
mesmos elementos básicos: 


variável contadora ou índice 


IO LET (N)=(1) valor inicial 
do índice 
20 PRINTN: "; 
valor do 
30 LET N=N+(2) incremento 
(do índice 


401FN< (9) THENGOTO 20 


50 PRINT “FIM” 


À repetição (da linha 20 à 40) se dá en- 
treos valores inicial e final fixados no pro- 
grama para a variável contadora, ou 
índice. 

No programa acima, as linhas 10, 30e 40 
servem exclusivamente para montar a ló- 
gica de repetição: 


linha 10 - inicialização da contadora 

linha 30 - incremento da contadora 

linha 40 - testa se o conteúdo da conta- 
dora atingiu o valor final. 


Portanto, na realidade, apenas a linha 
20 é o “miolo” da alça. 


Podemos colocar quantos comandos 
quisermos entre os comandos de início e 
fim de uma alça. Neste caso, todos serão 
repetidos tantas vezes quantas determi- 
nar à contagem. 


Porexemplo, vamos fazer um progra- 
ma para imprimir na tela o quadrado eo 
cubo dos múltiplos de 2 (2, 4, 6, Betc.), 
até 20. . 


10 LETN=2 
20 IF N> 20 THEN 80 


50 PRINTN,Q,C 


Observe que neste exemplo as linhas 
de 30 a 50 constituem os comandos a se- 
rem repetidos pela alça. As linhas 10, 20, 
60 e 70 são usadas para incrementar e 
testar esta alça. 


8 
Iças variáveis 


Outra possibilidade muito interessan- 
te é substituir as constantes correspon- 
dentes aos valores inicial, final e de incre- 
mento de uma alça por variáveis numé- 
ricas. Isto permite que, com uín único 
programa, possamos fazer uma infinida- 


60 CLS 

70 PRINT “EIS A TABUADA DE “T 
80 PRINT 

90 LETN=T 

100 PRINT N;” "; N*T 

HO LETN=N+T 

120 1F N<T*10 THEN GOTO 100 
130 STOP 


Um exemplo de execução deste pro- 


grama seria o seguinte: 


de de repetições diferentes. 


Porexemplo, vamos fazer um progra- 
ma que saiba contar de 1 até o número 
que quisermos (que será fornecido pelo 
teclado): 


Da mesma forma, o incremento tam- 
bém poderia ser colocado como variável. 
Por exemplo, este programa mostra na 
tela a tabuada de multiplicar que 


10 REM --- PROGRAMA QUE SABE CONTAR 
20 REM ---.... 
30 REM 
40 REM --- MENSAGEM INICIAL 
50 REM 
60 PRINT “EU SEI CONTAR DE 1 ATE O NUMERO” 
70 PRINT "QUE VOCE QUISER” 
80 PRINT 
90 PRINT “DIGITE O NUMERO QUE QUISER = "; 
100 INPUT NUM 
110 PRINT NUM 
120 PRINT 
130 REM 
140 REM --- INICIALIZACAO DA CONTADORA 
150 REM 
160 LET CONT=0 
170 REM 
180 REM --- ALCA DE REPETICAO 
190 REM 
200LET CONT=CONT+1 
210 PRINT CONT 
220 IF CONT <NUM THEN GOTO 200 
230 STOP 


quisermos. 
10 REM --- TABUADA DE 
MULTIPLICAR 
O REM sesscseecosceszisaseemace 
30 REM 


40 PRINT “QUE TABUADA 
VOCE QUER ESTUDAR?” 
50 INPUT T 


Os valores de incício, fim e incremento 
da alça não precisam ser inteiros ou cres- 
centes, como nos exemplos até agora. 


Se o valor do incremento for negativo 
(neste caso, o nome apropriado seria de 
cremento), a contagem será retroativa, 
ou seja, o valor final deverá ser menor do 
que o inicial. 


Por exemplo, vamos fazer um progra- 
ma que faça uma contagem retroativa 
para simular o lançamento de um 
foguete! 


O programa pode ser bem simples: 


10 REM --- PROGRAMA PARA CON 
TAGEM REGRESSIVA 


M 
40 PRINT“VAMOS LANCAR UM FO- 
GUETE DA” 
50 PRINT “BARREIRA DO INFER- 


60 PRINT 
70 PRINT “QUANTOS SEGUNDOS 


90 REM 


100 REM CONTAGEM REGRES- 


130 PRINT “ATENCAO” 
140 PRINT 

150 PRINT SEG;" ": 

160 LET SEG=SEG-—1 
170 IF SEG > 0 THEN 150 
180 PRINT 

190 PRINT 

200 PRINT “FOGO... ” 
210 STOP 


Observe que neste programa a variá- 
vel contadora (SEG) é inicializada pelo 
próprio comando INPUT, na linha 80. 


Como programa seguinte, você pode 
ver também que os valores da alça não 
precisam ser inteiros (ou seja, podem ser 
fracionários): 


10 PRINT'“VALOR INICIAL DO INDI- 
CE? E 


20 INPUTI 
30 PRINT “VALOR DO INCREMENTO 
DO INDICE ?” 
40 INPUT S 
9) aa “VALOR FINAL DO INDI- 
E?” 
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60 INPUT F 

70 LET N=1 

80 PRINT N;º "; 

90 LETN=N+S 

100 IF NF THEN GOTO 80 
110 PRINT 

120 STOP 


Por exemplo, se colocarmos os valores 
I=4, S=0.5e F=6, teremoso resultado: 


em um jeito 
mais fácil 


Como a programação de alças de re- 
petição é um recurso muito utilizado, a 
linguagem BASIC foi dotada de um co- 
mando que permite fazê-la de modo 
mais fácil do que usando o comando IF. 


Este comando é chamado de FOR 
que, em inglês, significa PARA. 


Para construir uma alça de repetição 
como comando FOR, é necessário mar- 
car também o final da mesma por meio 
de segundo comando, chamado NEXT 
(SEGUINTE, em português), e que sem- 
pre é usado em conjunto com o FOR. 


Siga o exemplo abaixo, para com- 
preender de que jeito os comandos 
FOR... NEXT são utilizados para obter 
uma repetição. 


USANDO IF 


10 LET N=1 

20 PRINTN 

30 LETN=N+1 

40 IF N<10 THEN GOTO 20 
50 PRINT “FIM” 


O comando na linha 10 do programa 
à direita está dizendo para o 
computador: 


10 repita PARA a variável N, indo de 1 
ATÉ 10, delem1. 


Todos os comandos que estiverem en- 
trealinha 10e 0 próximo NEXT serão re- 
petidos tantas vezes quantas o número 
indicar (no exemplo, apenas a linha 20). 


O comando na linha 30 está dizendo 
para o computador: 


30 PRÓXIMA repetição com a variável 
N. 


O que significa que o programa retor- 
na à linha 20 (ou a qualquer linha que es- 
tiver imediatamente em seguida à linha 
como comando FOR), para nova repeti- 
ção, desde que valor da contadora não 
tenha atingido o seu final. 


Portanto, o comando FOR serve para 
fixar: 


1. o nome da variável de contagem 
(índice) 

2. o valor inicial do índice 

3. o valor final do índice 

4. onde deve começar a alça de repetição 


Enquanto o comando NEXT serve pa- 
ra realizar o seguinte: 


1. incrementar o valor do índice 
2. testar se ele atingiu o valor final 
3. indicar o final da alça 


Depois da alça FOR...NEXT ter sido 
repetida n vezes, o programa retoma o 
seu fluxo normal, a partir da linha ime- 
diatamente após a linha que contém o 
NEXT. 


nr E oO 


O 
20 PRINT N;*":; 20 PRINTN;*]| "; 


30 LETN=N+(2) 


40 IFN<(0) THEN GOTO 20 40 PRINT “FIM” 


50 PRINT “FIM” 


USANDO FOR... NEXT 
10 FOR N=1 TO 10 

20 PRINTN 

30 NEXT N 


50 PRINT “FIM” 


Atenção: na linguagem BASIC para 
microcomputadores compatíveis com a 
lógica Sinclair (marcas TK 82C, TK 83, 
TK 85, CP 200etc.), é obrigatória a colo- 
cação do nome da variável-índice no co- 
mando NEXT. Em outros computadores, 
nem sempre isto é necessário. 


Você deve ter notado que o comando 
FOR, como foi mostrado até agora, não 
especificou o valor do incremento (quan- 
tidade a ser adicionada ao índice, a partir 
do valor inicial). 


Se nada for especificado no comando 
FOR, o valor do incremento é iguala 1. 


Se quisermos colocar um incremento 
diferente de 1, usamos o comando STEP 
(que significa PASSO), ao final do co- 
mando FOR: 


10 FOR 1=2 TO 10 STEP 2 
20 PRINTI;* *; 

30 NEXTI 

40 PRINT “FIM” 


Este programa vai mostrar todos os nú- 
meros pares de 2a 10. O incremento ne- 
cessário (no caso, 2) é indicado pela pa- 
lavra STEP. 

Portanto: 

FOR N=1 TO 10 STEP1 


é a mesma coisa que 


FOR N=1 TO 10 


Portanto, se compararmos as duas for- 
mas de programar uma alça, poderemos 
facilmente identificar os seus elementos 
básicos: 


USANDO FOR...NEXT 


om 


30 NEXT N 


Os comandos que estão entre um FOR 
eseu NEXT correspondente são agrupa- 
idos no chamado alcance da alça. Um 
outro nome que você poderá encontrar 
para alça, em outros livros e revistas, é 
malha. 


Ro contrário das alças construídas 

| com o comando IF, as alças com o co- 

mando FOR...NEXT admitem apenas 
uma estruturação. 


Note como o programa para elabora- 
da tabela de quadrados e de cubos 
muito mais simples: 


10 FOR N=2 TO 20 STEP 2 
20 LETO=N*N 
30 LET C=N*N*N 


Várias linhas de programação e uma 
complicação desnecessária são evitadas. 


Aslinhas 20, 30 e 40 são o alcance da 
alça, que vai de 20 a 50. 


Note também que o comando FOR 
aceita também especificações fracioná- 
rias ou negativas 


Porexemplo, o nosso programinha de 
contagem regressiva para os foguetes fi- 
caria assim: 


IOREM --- PROGRAMA PARA 
CONTAGEM REGRESSIVA 


K) 

40 PRINT “VAMOS LANCAR UM 
FOGUETE DA” 

a “BARREIRA DO INFER- 
NO..” 

60 PRINT 

70 PRINT *QUANTOS SEGUNDOS 
FALTAM?” 

80 INPUT SEG 


90 REM 

100 REM --- CONTAGEM 
REGRESSIVA 

110 REM 

129 CLS 

130 PRINT “ATENCAO” 

140 PRINT 

150 FOR S=SEG TO 1 STEP —1 

160 PRINT S;" ”; 

170 NEXT S 

180 PRINT 

190 PRINT 

210 STOP 


Vale a pena anotar algumas diferenças 
importantes entre este programa eo que 
mostramos anteriormente, usando o co- 
mando IF: 


1. a variável SEG (valor inicial da conta- 
gem regressiva) não pode ser usada 
também como variável de índice ou 
contadora. Por isso usamos o valor S; 


2. ovalor inicial (SEG) é menor do que o 
final (1); 


3. apesar do incremento ser 1, em valor 
absoluto, como é negativo, precisa ser 
especificado pelo comando STEP; 


4. todas as especificações do comando 
FOR podem ser constantes ou variá- 
veis, ou ainda expressões aritméticas 
válidas, indistintamente. 


Veja este exemplo: 


10 PRINT “QUE TABUADA VOCÊ 
QUER VER?” 


20 INPUT T 

30 PRINT “A PARTIR DE QUE VA- 
LOR?” 

AGINPUTI 

50 PRINT “ATÉ QUE VALOR?” 

60 INPUT F 

70 CLS 

80 PRINT “EIS A TABUADA DOS “T 

90 PRINT 

100 FOR N=1 TO F STEP T 

110 PRINTN;* *; 

120 NEXTN 

130 STOP 


Algunserrinhos que você deve evitar, 
quando for usar os comandos FOR... 
NEXT. 


1. nalinha como comando FOR, não po- 
dem ser omitidos o sinal de igualdade 
(=),o valor inicial (constante, variável 
ou expressão), a palavra TO, o valor fi- 
nal (constante, variável ou expressão), 
nesta ordem; 


2. a palavra STEP é opcional, mas, se co- 
locada, deve ser obrigatoriamente se- 
guida do valor do mesmo (também 
uma constante, variável ou expressão 
válidas em BASIC); 


3. não pode existir um comando FOR 
semo NEXT correspondente nem um 
NEXT sem FOR; 


4. é obrigatório colocar onome da variá- 
vel de índice no comando NEXT; 


5. o comando FOR deve ser encontrado 
pelo programa antes do comando 
NEXT que lhe corresponder. 


Verifique, na tabela de mensagens de 
erros (página 33), quais são os códigos 
que ocorrem quando cada uma das re- 
gras acima for desrespeitada na 
programação. 


esperando 
o tempo passar... 


Uma das utilidades das alças de repe- 
tição é fazer o tempo passar. Em outras 
palavras, se quisermos fazer com que o 
computador aguarde um certo período 
de tempo, entre uma fase e outra de um 
programa, podemos recorrer a uma alça 
FOX NEXT com um grande número de 
repetições, mas sem nenhum comando 
de entrada ou saída a seu alcance. Quan- 
to maior for o número de repetições, 
maior será o tempo obtido. 


Por exemplo: 


10 PRINT "COMPUTADOR"; 
20 FOR I=1 TO 500 

30 NEXTI 

40 GOTO 10 


Este programa escreve a palavra 
COMPUTADOR várias vezes, uma após 
a outra, até encher toda a tela. 


Entretanto, a “alça vazia” (isto é, que 
não contém nenhum comando) das li- 
nhas 20 e 30 cria um aumento de tempo 
que, no TK 85e em outros microcompu- 
tadores do mesmo tipo, corresponde a 
cerca de 2 segundos entre uma palavra 
eoutra. 


Outro exemplo, para fazer uma pala- 
vra piscar na tela: 


10 PRINT “COMPUTADOR” 
20 FOR I=1 TO 100 


60 FOR I= 1TON00 
70 NEXTI 
80 GOTO 10 


Neste programa, a linha 10 escreve.a 
palavra COMPUTADOR naprimeira li- 
nha da tela. Em seguida, há um peque- 
no aumento de tempo, dado pela alça 
nas linhas 20 e 30, que faz com que esta 
palavra permaneça na tela por um certo 
tempo. Depois, a linha 40 apaga toda a 
tela. As linhas 60 e 70 criam um novo au- 
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mento de tempo, que a mantém apaga- 
da por igual período, e a linha 80 realiza 
a repetição do processo. 


Muitos computadores, como é o caso 
dos compatíveis com a lógica Sinclair, 
têm um comando especial para obter au- 
mentos de tempo, ou pausas, como são 
tecnicamente chamadas. 


Este comando é denominado PAUSE. 
Procure-o no teclado de seu compu- 
tador. 


O programa acima poderia ser escri- 
to de forma muito mais simples, usando- 
se o comando PAUSE: 


10 PRINT “COMPUTADOR” 
20 PAUSE 20 

30 CLS 

40 PAUSE 20 

50 GOTO 10 


Quando o computador encontra o co- 
mando PAUSE, ele interrompe todo o 
processamento e continua a mostrar tu- 
do que foi escrito na tela durante n qua- 
dros (n é o número, maior que zero e me- 
nor que 32767, que indica ao computa- 
dor quantos quadros ele deve esperar). 
Normalmente, a tela é renovada, em um 
aparelho de TV, à velocidade de 60 telas 
ou quadros por segundo. Isto nos dá a 
impressão de que ela é fixa, mas na rea- 
lidade ele. está piscando tão depressa, 
que nem percebemos. 


Assim, no programa acima, o número 
20, depois do comando PAUSE, faz o 
computador esperar cerca de 20/60 de 
segundo, ou 1/3 de segundo, para depois 
prosseguir. 


Quais as vantagens ou desvantagens 
da alça FOR NEXT em relação ao co- 
mando PAUSE? 


Bem, em primeiro lugar, a pausa da- 
da por FOR NEXT funciona para qual- 
quer computador, em qualquer “dialeto” 
(variação) da linguagem BASIC. Por is- 
so, se você quiser fazer um programa que 
possa ser colocado em vários tipos de 
computador, use FOR... NEXT. 


Em segundo lugar, o comando PAU- 
SE tem uma peculiaridade: nos compu- 
tadorestipo TK, a cada 60 quadros (apro- 
ximadamente 1 segundo), atela de vídeo 
pisca perceptivelmente, produzindo 
uma imagem pouco estável. Este efeito 
artificial não ocorre com o FOR... NEXT. 


Por outro lado, uma vantagem nítida, 
que o PAUSE tem sobre o FOR... NEXT, 
é que utiliza um número menor de linhas 
do que este (portanto, o programa gasta 
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menos memória, é mais curto e mais fá- 
cil de ser entendido). 


Vamos ver mais algumas aplicações 
interessantes para o PAUSE. 


No programa de contagem regressiva 
anterior, podemos tornar mais real a si- 
mulação de uma contagem se fizermos 
assim: 


10 REM —- PROGRAMA PARA CON- 
TAGEM REGRESSIVA 

20REM --—==--......... nn neoon 

30 REM 

40 PRINT “VAMOS LANCAR UM 
FOGUETE DA” 

50 a “BARREIRA DO INFER- 
NO..” 


60 PRINT 

70 PRINT “QUANTOS SEGUNDOS 
FALTAM?” 

80 INPUT SEG 

90 REM 

100 REM --- CONTAGEM 

REGRESSIVA 

110 REM 

120 FOR S= SEG TO 1 STEP-+1 

130 PRINTS k 

135 PAUSE eo 

140 NEXT S 


RINT 
170 PRINT “FOGO... ” 


O comando PAUSE funciona até que 
alguma tecla seja pressionada. Se isto 
acontecer, e se o comando PAUSE esti- 
ver em execução (tempo de espera), o 
computador executa imediatamente a li- 
nha seguinte ao comando PAUSE. Evi- 
dentemente, isto não acontece com a 
programação de alças de espera de tem- 
po com os comandos FOR... NEXT. O 
computador fica “congelado”, não res- 
pondendo a nenhuma tecla (com exce- 
ção da tecla BREAK), durante todo o pe- 
ríodo de espera. 

O comando PAUSE pode ser usado 
também para apresentar várias telas de 
informação, dando tempo para que o 
usuário as leia, para, depois, limpar a tela 
com o comando CLS e para apresentar 
em seguida nova tela... 


10PRINT o DE ADIVINHACAO" 

20 PRINT *- == 

30 PRINT 

40PRINT “NESTE JOGO, EU VOU 
SORTEAR UM” 

50 PRINT “NUMERO ENTRE 1 E 100, E 
VOCÊ" 

60PRINT a e TENTAR ADIVI- 
NHAR QUA 

70PRINT POr” E 

80PAUSE 300 

99CLS 

100PRINT “GANHA QUEM ADIVI- 

NHAR EM MENOR” 


110PRINT “NUMERO DE VEZES” 
120 PAUSE 180 
130 PRINT 


Neste programa, as linhas de 10 a 70 
mostram a informação a ser lida na tela 
do vídeo. Em seguida, a linha 80 provo- 
ca uma pausa de cerca de 5 segundos (o 
que proporciona tempo para a leitura, 
mesmo para as pessoas que a deva- 
gar!), limpa a tela e passa para a segun- 
datela de informação (linhas 100 el10), 
dá nova pausa (menor), na linha 120, e 
assim por diante. 


Se a pessoa lê com rapidez, basta que 
ela pressione qualquer tecla ao terminar 
a leitura. Se o comando PAUSE corres- 
pondente ainda estiver sendo executado, 
ele é interrompido epassa imediatamen- 
te para a linha seguinte. 


1. Façaum programa para calcular a so- 

romano inteiros de 1 a 100 

versões para este progra- 

ma: uma usando alçascom IF, e outra 
usando alças com FOR... NEXT). 


2. Modifique o programa 
sp pl a, 
pi so ga 

* quer fornecido por um co- 


ei Faça um programa comoo acima, ó 
o fatorial de um nú- 


mero inteiro qualquer (N! 
ri o = 2X3X4...x q 
; co 5! = 2x3x4x5 


=, 
da Raio ua cm id 
mero muito alto (por exemplo, 
32 0001)? 


4. Qual é a seqrtiência de valores que os 


b. IOLETD=0 


40IF S 10THEN STOP 
SO PRINTS 
60GOTO 30 


5. Qualé a sequência de valores que se- 
A e 
dos FOR? 

a. FOR E=20 TO 100STEP 10 
. FOR X=10TO 20STEP 0.5 
. FORZ=5TO 1 STEP - 0.25 


£ FORN= dd it 


6. in pai 
nos programas seguintes: 


- 121 FOR X=1 TO 232 STEP 3 


122 PRINT X/3 
123 NEXT Y 


Resposta: 


. 10 FOR X$=1 TO 25 
20NEXT X$ 


. 10FOR I= —12 TO 12 STEP 2 
20PRINTI; 
30 NEXT 


Resposta: 


. IONEXT] 


20FOR]=2 TOS 
Resposta: 


RESPOSTAS AOS 
EXERCÍCIOS 
ANTERIORES 


du soa 


mando PAI 


a. PAUSE 30 

b. PAUSE 600 

c. PAUSE 10/60 
d. PAUSE1 


. Faça um programa para aceitar um 
nome qualquer pelo teclado e então 
fazê-lo piscar por 10 vezes seguidas, 
no meio da primeira linha da tela. 
Use comandos IF. 


. Faça um programa para calcular a 
soma de 10 números quaisquer, di- 
gitados no teclado. Use o comando 
FOR. 


10. Faça um programa para imprimir 


uma tabela das raízes quadradas dos 
números de 10 a 1000, de 10 em 10. 
Use o comando FOR. 


Quando o resto de uma divisão é zero, 
então o resultado da divisão é igual ao 
seu inteiro. 


10. Faça um programa que imprima na 
tela os números de 10 a 20. 


da divisão de um número 
por outro tem resto maior do que 
zero. 


Resposta: 


A função INT obtém o maior inteiro 
presente em um número qualquer. 


10INPUT N1 

20 INPUT N2 

30 LET D=N1/N2 

40IF INT (D)=D THEN GOTO 60 
50 PRINT “DEIXOU RESTO” 

55 GOTO 10 

60 PRINT “NAO DEIXOU RESTO” 
70 GOTO 10 


Resposta: 


10LET N=10 

20 PRINT N 

30 LET N=N+1 

401F N<20 THEN GOTO 20 
SOSTOP | 


Iças dentro 
de alças 


Muitas vezes é necessário repetir den- 
tro de um programa alças menores den- 
tro de alças maiores. Embora pareça 
complicada, esta operação é fácil de ser 
feita em BASIC, desde que tomemos al- 
guns cuidados. 


Para servir de exemplo, vamos fazer o 
seguinte programa: 


Queremos colocar na tela a lista dos 
números da cartela da Loto, de modo 
que cada dezena comece em uma linha 
nova. Dessa forma, temos: 


e assim por diante. 


Uma maneira bem fácil de programar 
isto é a seguinte: 


10 REM --- TABELA PARA APOSTAR 
OTO 


100 STOP 


Podemos ver facilmente que este pro- 
grama tem duas alças, uma dentro da 
outra: 


40FOR D=0TO 9 
50 FOR N=0TO 9 


60 PRINT D*'10+N;" *, 
7ONEXT N 


alça 
interna 


O primeiro FOR encontrado (linha 40) 
determina a repetição, por 10 vezes, de 
tudo que se encontra entre a linha se- 
guinte (linha 50) e o NEXT correspon- 
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dente (linha 90), ou seja, as linhas 50, 60, 
70e 80. 


Entretanto, dentro dessa alça, encon- 
tramos um segundo FOR, que determi- 
na a repetição, por 10 vezes, de tudo que 
se encontra entre a linha seguinte (linha 
60) e o NEXT correspondente (que está 
na linha 70). 


Portanto, a linha 60: 
60PRINT D'IO+N;* *; 


que é a única que se encontra dentro das 
duas alças, simultaneamente, será 
executada: 


10x 10= 100 vezes 


Como existe um ponto e virgula no fi- 
nal dessa linha, os números impressos 
sob controle da alça interna (linhas 50 e 
70) serão colocados sucessivamente na 
mesma linha, um após o outro, com um 
espaço em branco de separação entre 
cada dois algarismos. 


A linha 80 (que só é executada depois 
que a alça se completa) foi colocada para 
provocar uma mudança de linha no final, 
ou seja, para começar uma nova dezena 
na linha imediatamente abaixo. 


Para compreendermos como duas al- 
ças podem ficar “aninhadas” isto é, uma 
dentro da outra, costuma-se usar o recur- 
so das flechinhas de retorno: 


40FOR D=0TO 9 
SOFOR N=0TO 9 
60PRINT D*I0+N;* "; 
TONEXT 

80PRIN 

90NEXT D 


Ao ser executado o programa pela pri- 
meira vez, acontece o seguinte: 


1. ao encontrar a linha 40, o programa 
inicializa a variável contadora D com 
ovalor inicial 0, e especifica 9 como o 
valor final (máximo) e 1 como o incre- 
mento (STEP); 


2. ao encontrar a linha 50, o novo co- 
mando FOR inicializa a variável con- 
tadora N como valor inicial de 0 e es- 
pecifica o valor final como9, eoincre- 
mento como 1; 


O 


. à linha 60 é impressa pela primeira 
vez. Como D é zero e N também é ze- 
ro, ainda teremos como resultado da 
expressão D*10+N o valor zero, que é 
impresso; 


4. agora o programa encontra a linha 70 
(NEXT N), que provoca o incremento 
da variável N de mais 1, e em seguida 
este valor é comparado com o valor fi- 
nal do índioe, que é 9. Como ainda é 
menor do que este, a linha 60 (dentro 
da alça interna) é repetida mais uma 
vez. 

Mas agora o valor armazenado na 
variável N passou a ser 1, enquanto 
que o valor armazenado em D ainda é 
O. Portanto, calcula-se: 


D*10+N é igual a 0*10+1, 


ou seja, iguala 1, que é impresso na 
mesma linha que o valor O impresso 
anteriormente, por causa do ponto e 
vírgula; 


q 


novamente o programa encontra a li- 
nha NEXT N, incrementa (N passa a 
ser 2, testa, etc.). Depois de repetir is- 
toaté que 9 seja atingido, teremos uma 
linha impressa assim: 


6. portanto, ao terminar a alça que vai de 
50a 70, o programa executa a linha se- 
guinte, que é 80 (PRINT), mudando 
delinha natela, ecainalinha 90, que 
éum NEXT, ou seja, que incremen- 
taovalor armazenado na contadora D, 
testa se é menor que9, etc. Comonão 
éiguala9 ainda, o programa repete 
a linha logo abaixo do FOR D, ou se- 
ja, a linha 50. Como esta é uma linha 
FOR, também repete-se tudo de no- 
vo, como acima, só que o valor de Dé 
agora iguala 1. Portanto a linha a ser 
impressa passa à ser: 


e assim por diante. 


Vamos ver como ficariam, em uma ta- 
bela, os valores de N e D em cada repe- 
tição das duas alças: 


LINHA D N D*0+N 
“0 1) 1) (0) 
50 (0) (0) (0) 
50 (1) l l 
50 (0) 2 2 
50 (1) 3 3 
bo) 1) 4 4 
50 1) 5 5 
50 (0) 6 6 
50 (0) 7 7 
50 (/) 8 8 
50 (0) 9 9 
40 1 (/) 10 
50 1 l q 
50 1 2 12 
50 1 3 13 

etc. 


Pelatabela, você pode observar que os 
dois índices (D e N) das alças variam re- 
gularmente (são incrementados). Só que 
o indice da alça mais interna varia mais 
depressa, e o índice da alça mais exter- 
na, mais devagar. 


Podemos colocar várias alças, umas 
dentro das outras. 


À única regra que devemos seguir à 
risca é a seguinte: não pode haver “cru- 
zamentos” entre os FOR e respectivos 
NEXT das alças emparelhadas. Por 
exemplo, o seguinte programa provocará 
uma mensagem de erro: 


I00 FOR I=1 TO3 
HOFOR]=1 TO 2 
120PRINTI,J 
I30NEXTI 
I40NEXT] 


Se colocarmos as flechinhas que indi- 
cam os pares FOR... NEXT, veremos que 
há um cruzamento entre elas, o que indi- 
caoerro sintático: 


100 FOR I=1 TO 3 
NOFOR]=1 TO2 
120PRINTIJ 
I30NEXTI 
140NEXTJ 


Outro arranjo não permitido é usar a 
mesma variável-índice para duas ou mais 
alças que estejam aninhadas. Embora is- 
to, muitas vezes, não seja indicado pelo 
computador como um erro sintático, na- 
turalmente pode provocar erros lógicos 
muito difíceis de serem detectados. 


100FOR 1=1 TO3 
NO FOR I=1 TO 4 
120NEXTI 
I30NEXTI 


Da mesma forma, devemos evitar a 
modificação da variável-índice da alça 
dentro da mesma (por exemplo, através 
do comando LET ou do comando IN- 
PUT), demodoa evitar erros lógicos. En- 
tretanto, isto é permitido pelo interpreta- 
dor BASIC. Por exemplo: 


I0FOR 1=1 TO 10 
20LET I=1+1 
30PRINTI 
40NEXTI 


Coloque este programa no computa- 
dor e verifique qual é o resultado. 


m programa 
completo 


Agora você já conhece um número su- 
ficiente de comandos em BASIC para 
tentar seus primeiros programas comple- 
tos. Para exemplificar os passos de de- 
senvolvimento de um programa de maior 
porte, vamos programar iuntos a seguin- 
te tarefa: 


Faça um programa para calcular a 
média simples das matérias para ca- 
da um dos alunos de uma classe. Ao 
final, o programa deve mostrar a mé- 
dia geral da classe. Além disso, o 
programa deve informar para cada 
aluno as suas notas, a sua média, e se 
foi aprovado (nota igual ou maior que 
7, se ficou para recuperação (nota 
maior que 5 e menor que 7) ou se foi 
reprovado (nota menor que 5). Tanto 
o número de alunos quanto o número 
de matérias são variáveis (isto é, são 
diferentes para cada série, e devem 
ser informados ao programa). 


Solução: 


Vamos dividir o nosso trabalho de 
programação nas seguintes etapas: 


a. especificação dos dados de en- 
trada 

b. especificação dos dados de saí- 
da 


c. especificação das constantes in- 
ternas 


tes: 


a 


especificação das fórmulas de 

cálculo 

e. esquema geral do programa 
(etapas) 

. codificação em linguagem BA- 
SIC 

g. teste com alguns dados conheci- 
dos 

h. documentação 


— 


. Especificação dos 


dados de entrada 
Parâmetros de operação do pro- 


grama: 


CL$ - nome da classe (por exem- 
plo, 52 série A) 

NA - número de alunos na classe 

NM - número de matérias que a 
classe tem 


Dados individuais (para cada alu- 


no) 


NU - número da classe 
NO - nota em uma determinada 
matéria 


. Especificação dos 


dados de saída 


MG - média global da classe 
MA - média geral de cada aluno 


. Especificação das 


constantes internas 


AP - nota de aprovação (>= 7) 

RR - nota de recuperação (>=5 
e<7) 

RP | - nota de reprovação (<=5) 


. Especificação das 


fórmulas de cálculo 
S -soma das notas de cada 
aluno 


MA = S/ND - média geral do alu- 
no 


. Esquema geral 


do programa 


O programa terá as seguintes par- 


- identificação do programa 

- instruções breves de utilização 

- entrada de dados paramétricos 
(nome da classe, número de 
alunos e de matérias) 

- alça de entrada dos alunos: en- 
trada do número de classe e 
nome 


win 
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f. 


alça de entrada das notas de 
cada aluno 

cálculo da média do aluno 
acumulação da soma das mé- 
dias da classe 

impressão dos resultados de 
um aluno é 

cálculo e impressão da média 
global 

10. fim do programa 


o o ns a 


Codificação em 
linguagem BASIC 


DEM emma 
20 REM - MEDIAS 1.00 JAN 85 
30 REM - CALCULO DE MEDIAS DE UMA 
40 REM - CLASSE P/ SINCLAIR 


70 REM 

80 REM --- 1. IDENTIFICACAO ---- 

90 REM 

100 PRINT TAB 12; “MEDIA 1.00 

110 PRINT “CALCULO DAS MEDIDAS DA CLASSE” 

120 PRINT 

130 PRINT 

140 REM 

150 REM --- 2. OBJETIVO ---- 

160 REM 

170 PRINT “ESTE PROGRAMA TEM POR OBJETIVO” . 

180 PRINT “CALCULAR AS MEDIAS GERAIS 
DOS ALUNOS” 

190 PRINT “DE UMA CLASSE, A PARTIR DAS” 

200 PRINT "SUAS NOTAS NAS DISCIPLINAS." 

210 PRINT 

220 PRINT “FORNECA OS SEGUINTES DADOS” 

230 PRINT “PARA A CLASSE: 

240 PRINT 

250 REM 

260 REM --- 3. DADOS PARAMETRICOS ---- 

270 REM 

280 PRINT “NOME DA CLASSE?” 

290 INPUT CLS 

300 PRINT “NUMERO DE ALUNOS NA CLASSE?” 

310 INPUT NA 

320 NA = INT (NA) 

330 IF NA < 1 THEN GOTO 310 

340 PRINT “NUMERO DE DISCIPLINAS?” 

350 INPUT NM 

360 NM = INT (NM) 

370 IF NM < 1 THEN GOTO 350 


390 REM --- 4. ENTRADA DOS ALUNOS 

400 REM 

405 FOR ALUNO = 1 TO NA 

410 CLS 

420 PRINT “CLASSE : “; CL$ ;" ="; 

430 PRINT “ALUNO NO."; "; ALUNO 

440 PRINT *“ =EZSSSSESSEESS=== o 
450 PRINT 

460 PRINT “DIGITE OS DADOS DESTE ALUNO:” 
470 PRINT 

480 PRINT “NOME?” 

490 INPUT NO$ 

500 PRINT “NUMERO DA CLASSE?” 

510 INPUT NU 


540 REM --- 5. ENTRADA DAS NOTAS --- 
550 REM 

560 LET S = O 

570 FOR NOTA = 1 TO NM 

580 PRINT “NOTA DA MATERIA” ; NOTA 
590 INPUT NO 

6001F NO< O THEN 590 

6101F NO>10 THEN 590 

620 LET S = S + NO 


630 NEXT NOTA 
635 LET MA = S/NM 
640 PRINT 


650 PRINT “MEDIA GERAL = “; MA 
660 LET MG = MG + MA 


670 NEXT ALUNO 

680 REM 

690 REM ---- 6. CALCULO MEDIA GLOBAL --- 
700 REM 

710 CLS 


720 PRINT “MEDIA DA CLASSE” ; MG/NA 
730 STOP 
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TESTE 


9.1.Quando é necessário usar variáveis dentro de um programa para arma- 
zenar o resultado de expressões? 


Resposta: 


9.2. Indique o que está errado nas linhas abaixo: 
a. 25 LET NOME$=25 

b. 30 LET VARI$=“12AB 

c. 40 LET C=“COMPUTADOR” 
d. 50 LET C$=25+4*22 

e. 60 LET LOG(N) = 423 

£. 70 PRINT X=225 

g. 80 LET “COMPUTADOR" = C$ 


9.3. Identifique, na coluna à direita, qual é o tipo de constante ou variável 
em BASIC, marcando a letra correspondente na coluna à esquerda: 


a. variável alfanumérica ( ) 123.14 
b. variável numérica ( ) "ATOMO” 
c. constante alfanumérica ( Jia 
d. constante alfanumérica (Dm 
e. comando BASIC (. ) LEE 
( ) ABC$ 
() “LET” 
( ) “PRINT 123” 
( ) RUN 100 


9.4. Como faz o computador para armazenar na memória um nome compos- 
- to de vários caracteres? 


Resposta: 


9.5. Defina: 


a. caractere: 


b. cadeia de caracteres: 


c. variável alfanumérica: 


d. variável numérica: 


e. constante alfanumérica: 


f. constante alfanumérica: 


9.6. Qual é o comprimento máximo de uma cadeia de caracteres permitido 
pelo BASIC? 


Resposta: 


9.7. Descreva as diferenças básicas de funcionamento entre os comandos 
LET e INPUT. O que têm eles em comum? 


Resposta: 


9.8. Mostre como aparecerá a linha de baixo da tela, quando o programa 
encontrar os seguintes comandos (dica: cursor K ou L, com ou sem as- 


pas): 


50 INPUT NS 


9.9. Como se deve proceder para interromper a execução do programa, ca- 
so ele esteja parado nas linhas acima? 


Resposta: 


9.10.Cite três usos para o comando REM em um programa. 
Resposta: 1. 

2. 

3. 


9.11. O que é um comando executável? Dê três exemplos. 


Resposta: 1. 
2. 
3. 


9.12. Identifique na coluna à esquerda cada comando em BASIC, com a 
função que ele realiza na coluna à direita: 


a. RUN (| ) armazena algo em uma variável 
b. NEW ( ) linha de comentário 
c. STOP ( ) inicia a repetição de uma alça 
d. PRINT ( ) executa um programa 
e. LET (  ) continua um programa interrompido 
f. REM ( ) mostra um resultado na tela 
g. INPUT ( ) testa uma condição 
h. PAUSE ( ) limpa a tela 
ii GOTO ( ) continua a repetição de uma alça 
j. CLS ( ) interrompe a execução do programa 
1. FOR (| ) apaga um programa da memória 
m. NEXT (| ) entra um valor pelo teclado 
n. LIST (| ) desvia o programa para outra linha 
o. CONT (. ) lista um programa na tela 
p. EDIT (| ) corrige uma linha de programa 
( 


) provoca uma pausa no programa 
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9.13. 


9.15. 


9.16: 


9.17, 


9.18. 


9.19. 


9.20. 


Defina: 


a. variável somadora: 


b. variável contadora: 


c. alça de repetição: 
d. cláusula lógica: 


e. operador relacional: 


£. alça sem fim: 
g. aninhamento de alças: 


. Identifique os elementos básicos de uma alça: 


FORI=1 TO 12 STEP 2 

O que o programa abaixo vai mostrar na tela ao ser executado? 
10 FOR I=1 TO 10 STEP 10 

20 FOR ]=I TO 1+2 

30 PRINT J; 


40 NEXT J 
50 NEXT 1 


Resposta: 


O que acontecerá ser for adicionada a seguinte linha ao programa 
acima? 


45 PRINT 


Faça uma programa para gerar na tela todas as combinações possíveis 
de preenchimento do cartão da Loteria Esportiva. Por exemplo: 


1 - COLUNA 1 3 - COLUNA 1 
2 - COLUNA 1 COLUNA 3 
COLUNA 2 


Dica: numere as colunas 1, 2 (do meio) e 3. 


Cite duas regras importantes que não podem ser violadas no aninha- 
mento de alças. 


Resposta: 


Cite duas vantagens do comando FOR para construir alças, em relação 
ao comando IF. 


Resposta: 


Modifique o programa para o cálculo das médias de uma classe (pá- 
ginas 54 e 55), de modo a permitir colocar as notas-limites para apro- 
vação, recuperação e reprovação, por meio de comandos INPUT 
(variáveis). 


Faça um programa para apresentar na tela três exercícios de tabua- 
da de multiplicar e testar se o resultado apresentado pelo aluno foi 
correto. O programa deve dizer, ao final, quantos exercícios foram 
resolvidos corretamente pelo aluno. 


CAP Í 


T UU LO 


7 


EB 


Ea q ORTE E AZAR NO 


g COMPUTADOR 
= 


Para muitas pessoas, o jogo é uma 
das coisas mais interessantes e diver- 
tidas que se pode fazer com um com- 
putador. Se o jogo incluir efeitos de 
acaso, sorte ou azar, melhor ainda! 


Este capítulo será quase todo dedi- 
cado aos jogos e aos modos de 
programá-los. Vamos começar com 
um joguinho bem simples, de adivi- 
nhação, depois estudar como fazer 
um programa útil ao ensino e, final- 
mente, vamos programar alguns jo- 
guinhos que utilizam gráficos na tela. 


Para introduzir o acaso (sorteio de 
um dado, por exemplo) em um jogo, 
é necessário conhecer uma função 
própria da linguagem BASIC que 
permite sortear números. 


Esta função é chamada de RND, 
abreviatura da palavra inglesa RAN- 
DOM, ou seja, aleatório (ao acaso). 


A função RND, portanto, serve pa- 
ra sortear números aleatórios. 


Números aleatórios são números 
escolhidos ao acaso pelo computa- 
dor, a partir de certo conjunto maior 
de números. 


Vamos imaginar, por exemplo, co- 
mo é o sorteio de um número em um 
dado. 


Ao lançarmos o dado, a face que 
ficar para cima será o número sortea- 


do. 
E 
Naturalmente só temos seis alterna- 
tivas possíveis no lançamento do da- 
do. À este conjunto de números cha- 
mamos de espaço amostral. O núme- 


ro aleatório só poderá ser um destes 
seis. . 


Outro exemplo seria uma moeda, 
no jogo de cara ou coroa. Só temos 
aqui duas alternativas. Vamos excluir 
a possibilidade de a moeda ficar de 


pé sobre a borda! O espaço amostral 
da moeda é igual a 2. O espaço 
amostral do dado é igual a 6. 


A probabilidade de que um deter- 
minado número aleatório saia em um 
sorteio é definida como o inverso do 
número das alternativas possíveis. 


Assim, por exemplo, a probabili- 
dade de sair no dado um determina- 
do número é de: 

1 um evento em 
6 seis alternativas possíveis 

Expressando em percentagens, ha- 

veria a probalidade de sair um núme- 


ro qualquer como sendo: 


100 x 1 = 
6 


16,6666% 


Em outras palavras, se jogarmos 
um dado 100 vezes, cada uma das fa- 
ces será sorteada cerca de 16 vezes 
aproximadamente. Para calcular, 
portanto, quantas -vezes se espera um 
determinado resultado, multiplica- 
mos a probabilidade pelo número de 
vezes em que ser realizará o sorteio. 


Quantas vezes, por exemplo, se es- 
pera que saia coroa, se lançarmos 
uma moeda 200 vezes? 


1/2 x 200 = 0,5 x 200 = 100 vezes 


1/2 é a probabilidade de que coroa 
seja sorteada um um lançamento. 


Note que a probabilidade de sair 
cara é a mesma de sair coroa, ou se- 
ja, 50%. Tanto neste caso, como no 
caso de um dado, dizemos então que 
a distribuição probabilística e UNI- 
FORME, ou seja, todos os números 
possíveis têm a mesma probabilidade 
de ser sorteados. 


O) 

' EA funçã RND 
k (o) 

nam 

LR 


Como podemos utilizar esta função 
do BASIC para simular o sorteio de 
números aleatórios uniformes? 


Você se lembra de que uma função 
em BASIC efetua sempre um cálculo 


ou devolve um resultado, a partir de 
um dado ou argumento que dermos a 
ela dentro do programa. 


Para calcularmos, por exemplo, a 
raiz quadrada do número 25, fazemos 
assim: 


LET R = SOR (25) 


sendo 25 o dado ou argumento. A 
função SOR, quando chamada, re- 
torna o resultado (no caso, 5), que é 
ia na variável indicada por 


Podemos também colocar a função 
dentro de uma expressão: 


LET RAIZ = 100 * SOR (25)/3 


ou ainda, dentro de um comando 
PRINT: 


PRINT SOR (25) 


A função RND é um pouco diferen- 
te. Ela não precisa de um argumento. 
Bastaria colocar, por exemplo, 


PRINT RND 


para sortear um número aleatório ou 
usar RND dentro de uma expressão 
LET. 


Em segundo lugar, a função RND 
não faz nenhum cálculo matemático, 
como no caso da raiz quadrada 
(SOR) e outras funções em BASIC 
deste tipo. 


Ela apenas retorna um número 
aleatório de distribuição uniforme, 
compreendido entre zero (0) e um 


(1. 


Cada vez que a função RND é usa- 
da, um nmero aleatório inteiramente 
diferente é sorteado. 


Por isso, a função RND é chamada 
de geradora de números aleatórios. 


O conceito de número aleatório, 
no caso da função RND é parecido 
com o do sorteio de dados e moedas, 
só que o número sorteado não é um 
número inteiro (1, 2, 3 etc.), mas um 
número fracionário, entre 0 e 1. 


Se colocarmos, por exemplo, no 
computador o seguinte programa: 


10 FOR I=1 TO 10 


8 


20 PRINT RND 
30 NEXT I 


sortearemos em seguida 10 números 
aleatórios, que serão impressos na te- 
la assim: 


0.03892129 
(.12455412 
0.67129093 
0.00112232 
0.48983312 
0.87811121 
0.11201232 
0.00989823 
0.01909123 
0.53219883 


Se você executar novamente o pro- 
grama, um novo conjunto de 10 nú- 
meros totalmente diferente do pri- 
meiro será mostrado na tela. Um nú- 
mero deste tipo nunca se repete. 


Na realidade, o nosso “sorteador” 
não é tão perfeito assim. O número 1 
“redondo” (1.000000000) nunca é 
sorteado. Os limites do sorteio caem 
então entre 0.000000000 (zero perfei- 
to) e 0.999999999. 


sando RND 
em jogos 


O gerador de números aleatórios 
do BASIC é do tipo universal, ou se- 
ja, ele pode ser usado para simular 
qualquer tipo de sorteio (dados, moe- 
das, baralhos etc.). Vamos ver como 
isto é feito. 


Comecemos com o caso mais sim- 
ples: a moeda. 


Cada evento probabilístico (em ou- 
tras palavras, o que pode resultar do 
lançamento honesto de uma moeda) 
tem a probabilidade de 0,5. 


Portanto, para simular o lançamen- 
to de uma moeda com a função RND, 
podemos fazer simplesmente isto: 


1. sorteamos um número fracioná- 
rio de O a 1 com a função RND; 


2. testamos se este número é me- 
nor do que 0,5. Se for, consideramos 
que saiu cara, por exemplo. Se for 
maior do que 0,5, consideramos que 
saiu coroa (podia ser o contrário, pois 
esta é uma convenção que depende 
apenas do programador). 


so 


Vejamos um programa que realiza 
isto: 


10 LET R=RND 
20 IF R<0.5 THEN PRINT 
“CARA” 


30 IF R>=0.5 THEN PRINT. 


“COROA” 
40 GOTO 10 


Vamos interpretar o que faz este 
programa: 


- linha 10 = sorteie um número fra- 
cionário entre O e 1 e armazene-o na 
variável R; 


- linha 20 = se R for menor do que 
0.5, imprima a palavra CARA; 


- linha 30 = se R for maior ou igual a 
0.5, imprima a palavra COROA; 


- linha 40 = volte para a linha 10 (no- 
vo sorteio). 


Se executarmos este programa, 
poderemos ter o seguinte resultado: 


CARA 
COROA 
CARA 
CARA 
CARA 
COROA 
CARA 
COROA 
COROA 


e assim por diante, até encher total- 
mente a tela. Observe que, neste sor- 
teio, saíram apenas três coroas e cin- 
co caras. Mas não havíamos dito que 
o número de caras e coroas seria 
igual? 


Bem, isto só vai acontecer se sor- 
tearmos um número muito grande de 
vezes! Quanto mais sortearmos, mais 
semelhante será a ocorrência dos 
dois eventos. Esta é a chamada lei 
dos grandes números. 


Como a função RND tornou possi- 
vel um sorteio “honesto” da moeda? 


Você se lembra de que nós disse- 
mos que a distribuição aleatória do 
gerador RND é uniforme, não é? 


Isto significa simplesmente que ca- 
da um dos números a serem sorteados 
tem a mesma probabilidade. Em con- 
segúência, se dividirmos este conjun- 
to de números em duas partes (menor 
e maior do que 0,5 respectivamente), 
a probabilidade de sair um número 
que caia numa destas duas metades 
continua sendo igual, certo? 


Como dividimos o espaço amostral 
em apenas duas possibilidades, será 
de 0,5 a probabilidade de cada uma 
delas! 


Podemos estender este raciocínio 
para outras divisões: em 3, 4, 5, 10 
possibilidades etc. 


Mas há um inconveniente: teremos 
que aumentar o número de IF no pro- 
grama, para poder testar todas as 
possibilidades. 


Existe, felizmente, um meio mais 
fácil de fazer isto. Usaremos um arti- 
fício matemático muito simples e tácil 
de entender, que serve para gual- 
quer ocasião. 


Vamos agora tomar como exemplo 
o dado. 


O dado tem um espaço amostral de 
6: existem apenas seis possibilidades 
de sorteio. 


Se multiplicarmos o resultado da 
função RND por 6, teremos o seguin: 
te: 


menor número que pode ser 
sorteado por RND =0 
multiplicado por 6 =6x0=0 


maior número que pode ser 
sorteado por RND = 0.999999999 
multiplicado por 6 = 5.999999994 


Teremos, portanto, um número fra: 
cionário, que pode ser desde O até 
5.999999994 


Como queremos um número intei- 
ro distribuído entre 1 e 6, basta usar: 
mos a seguinte expressão em BASIC: 


INT (RND*6) + 1 


Vamos analisar o que esta expres: 
são faz com o número sorteado: 


- primeiro, ela multiplica o número 
aleatório por 6, dando, portanto, um 
número aleatório entre O e 
5.999999994; 


- em seguida, calcula o inteiro deste 
número (ou seja, o dígito à esquerda 
do ponto) e obterá um número de 0a 
5; 


- finalmente, soma 1 a este número. 
Portanto, teremos um número de 1 


6. 


Conseguimos programar um sor- 
teador de dados! 


Vamos tomar um exemplo com al- 
guns números aleatórios, para enten- 
der como funcionam estas transfor- 
mações: 


RND* 6 
0.0000000 
0.0152052 

2.070741 
5.9999994 


Para ver um maior número de 
exemplos, coloque no computador o 
programa abaixo: 


10 LET R=RND 

20 PRINT R; R*6; INT (R*6); INT 
(RND*6) + 1 

30 GOTO 10 


Agora podemos programar o nosso 
primeiro joguinho, para sortear um 
dado quantas vezes quisermos: 


10 REM --- JOGO DE SORTEIO DE 
UM DADO 

20 REM --- PARA MICROS TIPO ZX 

A BEM s+e==0-.=—=<encoecengenecensezentsa 

40 REM 

50 PRINT “SORTEIO DE UM DADO” 

60 PRINT 


70 PRINT "QUANTAS VEZES QUER 
NCAR O DADO? 

80 INPUT NV 

9 PRINT NV 

100 PRINT 

HO FOR I=1 TO NV 

120 PRINT “SORTEIO NO."; 1;"="; 
NT (RND*6)+1 

130 NEXT 1 

149 STOP 


1 


Um exemplo de jogada seria o se- 
guinte: 


INT (RND * 6) INT (RND*6) + 1 
0 1 
0 1 
2 3 
5 6 


aleatório mesmo? 


Teoricamente, um bom gerador de 
números aleatórios nunca deveria re- 
petir a mesma sequência de números 
sorteados. Entretanto, isto é impossi- 
vel de se conseguir na prática, devi- 
do à maneira como eles são progra- 
mados na memória ROM do compu- 
tador. 


Explicando de maneira simplifica-. 


da, um gerador interno de números 
aleatórios funciona da seguinte ma- 
neira: 


Um número aleatório, ao ser gera- 
do pela função RND, fica armazena- 
do internamente em uma memória de 
trabalho. Uma segunda vez que a 
função RND for chamada, ela trans- 
forma este número armazenado por 
um processo matemático especial, 
para gerar um outro número aleató- 
rio. Este processo se repete tantas ve- 
E quantas a função RND for chama- 

a. 


Por isso, dizemos que o gerador 
aleatório precisa de uma “semente” 
para funcionar. O número gerado em 
cada chamada serve de semente para 
o próximo. A segúência então é 
pseudo-aleatória, e depois de alguns 
milhões de sorteios pode se repetir 
novamente. 


O mais grave, entretanto, é que, 
quando ligamos o computador pela 
primeira, vez, o gerador aleatório 
sempre usa uma “semente” fixa, que 
é 0.0022735596. 


Isto significa que o joguinho que 
você programar poderá estar “vicia- 
do”, desde que se saiba qual é a se- 
guúência inicial. 


Para evitar isto, o BASIC tem um 
comando chamado RAND, que pode 
ser usado logo no começo do progra- 
ma, para gerar uma “semente” ao 
acaso, ou seja, a primeira semente da 
série de sorteios. 


Para todos so efeitos, precisamos 
dar um comando RAND ao computa- 
dor apenas uma vez antes de cada sé- 
rie de sorteios. 


Por exemplo: 


5 RAND 
10 PRINT INT (RND*2)+1; 
20 GOTO 10 


vai sortear números 1 e 2 ao acaso. À 
linha 5, com o comando RAND, será 
uma sementinha aleatória inicial, de 
modo que ninguém conseguirá advi- 
nhar a segiúência de sorteios. 


Note bem: não confunda o coman- 
do RAND com a função RND. 


EXEREÁInS 
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3. Indique qual o número aleatório 
mínimo podem sair, 


a. INT (RND) 

b. INT (RND*8) +2 
c. INT (RND*2)-1 
d. RND/2 

e. RND*RND o 


4. Teste no computador qual será o 
resultado dos seguintes programas: 


a. 10 PRINT RND (0) 
20 GOTO 10 


b. 10 PRINT RND (1) 
20 GOTO 10 


5. Faça um programa para sortear as 
cartas de um baralho, mostrando o 
seu valor ou figura na tela. 


Dica: as cartas de um baralho são: 
2,3;4,5,6,7,8,9,10,], Q, Ke A, 
em quatro naipes (espadas, copas, 
paus e ouros). 


Faça dois sorteios no programa: 
um para sortear a figura, outro para 
sortear o naipe. Depois apresente o 
resultado assim: 


A CARTA SORTEADA 
FOI5 DE COPAS. 


A CARTA SORTEADA 
FOI VALETE DE PAUS. 


e assim por diante. 


ogos interativos 
J 
+) 


Um jogo que só pode sortear coisas 
não é muito interessante, pois logo a 
gente se cansa. Além disso, é mais 
divertido usar uma moeda, um dado 
ou um baralho de verdade! 


A grande vantagem que o compu- 


o2 


6. Faça um programa para imprimir 
20 sorteios de um número aleatório R, 
calculando é imprimindo em cada 
sorteio as seguintes transformações 
do programa: 


a. R'10 
b. 1+INT (Rº10) 
e. 10 +INT (Rº10 ) 


7. O que fazem os programas abaixo? 
a. 10 FOR I=1 TO INT (RND*200) 
20 NEXT 1 


8. Escreva as expressões com a fun- 
ção RAND, necessárias para sortear 
números aleatórios que simulem os 
seguintes jogos: 


a. roleta (números O a 35) 

b. palitinho (0 a Spalitos) 

c. loto (números 0a 99) 
9. Faça um programa que sorteie 10 
vezes um número aleatório inteiro, 
compreendido entre um mínimo de 
50 e um máximo de 100 (inclusive). 


10. Qual é o número esperado de ve- 
zes que: 


a. sairá o número 6 em um dado 
lançado 300 vezes? 


b. sairá o ás em 20 cartas retiradas 
de 20 baralhos? 
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tador oferece na programação de jo- 
gos é sua interação com a pessoa. Po- 
demos fazer com que o computador 
jogue com uma pessoa para ver quem 
ganha. 


Programar um jogo deste tipo é fá- 
cil. Basta usar os comandos: 


RND - para sortear alguma coisa 
INPUT - para pegar respostas (ou jo- 
gadas) do usuário. 

IF - para testar se é igual ou di- 
ferente do sorteado 


Vamos começar com um jogo bem 
simples: o tradicional cara ou coroa. ' 


OBJETIVO DO JOGO 
“CARA OU COROA" Nº 1: 


O computador pergunta à pessoa o 
que irá aparecer: cara ou coroa. Em 
seguida, sorteia a moeda e mostra se 
a pessoa acertou. Se ela errou, quem 
ganha é o computador. Se ela acer- 
tow, o computador perde. 


10 REM --- JOGO DE CARA OU 
COROA Nº 1 


50 PRINT “CARA OU COROA” 

60 PRINT “==============" 

70 PRINT 

80 PRINT “ESCOLHA O QUE VO- 
CE QUER:” 

99 PR 


V) INT 
100 PRINT “1 =CARA 2= COROA" 
110 PRINT 
120 A “DIGITE UM NUMERO 1 


130 INPUT JOGO 

140 IFJOGO < 1 THEN GOTO 120 
150 IFJOGO > 2 THEN GOTO 120 
160 REM 

170 REM --- SORTEIO DA MOEDA 
180 REM 

190 LET FACE=1 + INT (RND*2) 
200 PRINT 

210 IF FACE = 1 THEN PRINT “SAIU 


Cc 

220 IF FACE =2 THEN PRINT “SAIU 
COROA” 

230 REM 

240 REM --- VERIFICA QUEM GA- 
NHOU 


250 REM 

260 PRINT 

270 IF JOGO = FACE THEN 300 
280 PRINT “EU GANHEI 

290 GOTO 310 

300 PRINT “VOCE GANHOU” 
310 STOP 


Para jogar outra partida, digite 
RUN novamente ou então modifique 
o programa, substituindo a linha 310 
por 


310 GOTO 70 


Vamos: fazer agora um jogo um 
pouco mais sofisticado: 


OBJETIVO DO JOGO 
“CARA OU COROA" Nº 2: 


O computador pergunta à pessoa o 
que irá aparecer: cara ou coroa. Em 
seguida, sorteia a moeda e mostra se 


a pessoa acertou. Os sorteios são re- 
petidos n vezes. Ganha quem acertar 
maior número de vezes. 


Não precisa apagar da memória do 
computador o jogo anterior. Basta 
modificar ou inserir as linhas que são 
diferentes na listagem abaixo: 


10 REM --- JOGO DE CARA OU 
COROA Nº 2 


LET NCOMP = 0 

LET NJOG=0 

PRINT “CARA OU COROA” 

PINI “=== s== e! 

PRINT “QUANTAS VEZES 

QUER JOGAR ?” 

INPUT NV 

FOR N=1 TO NV 

PRINT 

PRINT JOGADA Nº”; N 

PRINT “ESCOLHA O QUE VO- 
UER :” 


sestsass 


s3sse 


= CO- 


120 PRINT “DIGITE UM NÚMERO 1 
OU 2" 


30 INPUT JOGO 

OGO < | THEN GOTO 120 
JOGO > 2 THEN GOTO 120 
M 

70 REM --- 


SORTEIO DA MOEDA 
180 REM 
9M LETFACE=1 + INT (RND * 2) 


200 PRINT 
2101 FACE = 1 THEN PRINT “SAIU 
CARA” 


ES 
Em 


220 IF FACE =2 THEN PRINT “SAIU 
COROA” 

230 REM 

249 REM -—-- VERIFICA QUEM GA- 
NHOU 

250 REM 

260 PRINT 

270 IF JOGO = FACE THEN 300 

280 PRINT “EU GANHEI” 

285 LET NCOMP = NCOMP+ 1 

28 GOTO 310 

300 PRINT “VOCE GANHOU” 

3065 LET NIOG=NIOG+1 

310 NEXT N 

320 REM 

330 REM --- VERIFICA NUMERO FI- 
NAL DE PONTOS 


340 REM 

356 PRINT “EU ACERTEI”; 
NCOMP;" VEZES" 

360 PRINT vi ACERTOU” 
;NIOG;” VEZES” 

370 PRINT 


380 IF NJOG >NCOMP THEN 
PRINT “PARABENS, VOCE GA- 
NHOU” 


390 IF NIOG < NCOMP THEN 
PRINT “EU SOU O CAMPEÃO” 

400 IF NJOG=NCOMP THEN 
PRINT “EMPATE” 

410 STOP 


As diferenças entre este programa 
e o número 1 são as seguintes: 


- a variável NCOMP, zerada na linha 
42, servirá para contar o número de 
vitórias do computador; 


- a variável NJOG, zerada na linha 
44, servirá para contar o número de 
vitórias do jogador; 


- a variável NV indica o número de 
sorteios que serão realizados e que 
controla a alça que vai da linha 66 até 
a linha 310 


- nas linhas 285 e 305 são incrementa- 
das as contadoras NCOMP e NJOG, 
conforme o ganhador tenha sido o 
computador ou o jogador, respecti- 
vamente; 


- as linhas 320 a 40) servem para 
anunciar O resultado final. 


Com alguma imaginação você 
conseguirá aperfeiçoar este jogo até 
que ele se torne realmente emocio- 
nante. 


EXE 


1. Faça um programa de cara ou co- 
roa semelhante ao anterior, usando, 
ps um dado, ao invés de uma 


Dicas: Na linha 130 a pessoa deve 
entrar um número de 1 a 6. Modifi- 

que as linhas anteriores (para instru- 
com) ea linha 150 (teste): 


” na a expressão da linha 

- modifique as linhas 210 e 220 que 
anuciam o resultado; 

- modifique as linhas de título. 


2. Faça um programa que sorteie 
dois dados, e mostre a soma dos nú- 
meros sorteados. Se a soma for igual 
a 7, pare de sortear. Se for diferente 
de ii sorteie novamente. 


3. Faça um programa que sorteie as 
cartas de um baralho completo, per- 
guntando antes ao jogador qual nai- 
pe ele acha que sairá sorteado. 


4, Explique por que o seguinte pro- 
grama na ser usado para substituir 
o comando RAND, em computadores 
que não o possuem: 


10 PRINT “QUE HORAS SAO 
HH.MM)" 

20 :H | 

30 FOR I=1 TO INT (H*10) 

40 LET R=RND 

50 NEXT I 

5. Faça um programa para simular o 

seguinte jogo ("Porquinho"): o com- 

putador pé um dado várias ve- 


zes. O número de pontos de cada 
lançamento é acumulado com os dos 
lançamentos anteriores. Depois de 
cada lançamento, o programa per- 
gunta ao jogador se quer continuar 
ou desistir. Se o jogador desistir, fica 
com o número acumulado de pontos 
até aquele momento. Se continuar, 
entretanto, caso o computador sor- 
teie o número 1, perde tudo o que já 
acumulou antes. Ganha quem acu- 
mular mais pontos. 

Dica: Use um acumulador chamado 
SOMA. No final de cada sorteio, per- 
gunte: 


QUER CONTINUAR 
(SIM “OU NAO)? 


& verifique se a resposta foi “SIM” ou 
"NÃO". 
y 


aa 
luxogramas 


Nesta seção, vamos aprender uma 
nova maneira de planejar progra- 
mas. Você já deve ter notado que, 
quando o programa tem uma lógica 
muito complexa, ou seja, tem muitos 
desvios condicionais e incondicionais 
(IF, GOTO etc.) fica muito difícil vi- 
sualizar quais os caminhos que o pro- 
grama deve seguir. 


O planejamento prévio do progra- 
ma, nestes casos, é uma atividade 
muito importante, porque auxilia o 
programador a desenvolver progra- 
mas: 


- mais facilmente escritos na lingua- 
gem BASIC; 

- mais livres de erros, ou seja, com 
pouco ou nenhum erro, quando 
testados pela primeira vez; 

- cujos erros são facilmente encon- 
trados, corrigidos etc.; 

- mais simples e compactos, ou seja, 
facilmente compreensíveis, efi- 
cientes e que ocupam um espaço 
menor de memória. 


Se digitamos um programa no 
computador, à medida que as idéias 
vêm à nossa cabeça, há uma grande 
probabilidade de que este programa 
fique confuso, com erros e de difícil 
compreensão. E: ra muitas vezes 
ele faça corretamente o trabalho para 
o qual foi destinado, nem sempre O 
faz da forma mais eficiente. 


Tudo isto é especialmente mais evi- 
dente em relação aos programas com 
lógica mais complexa. 


Um modo eficaz de planejar pro- 
gramas deste tipo é o denominado 
FLUXOGRAMA, também chamdo 
de DIAGRAMA DE BLOCO. 


O fluxograma é uma forma de re- 
presentar graficamente (por símbolos 
ou figuras) a estrutura e O fluxo de 
um programa. 


Cada parte do programa (geral- 
mente cada linha) é representada por 
um símbolo especial, que correspon- 
de estreitamente ao tipo de comando 
ou instrução a ser usado. Estes siímbo- 
los são denominados blocos. 


Por exemplo, o comando LET é re- 
presentado por uma “caixinha”, ou 
retângulo, que contém a expressão 
ou atribuição a ser realizada: 


o4 


C=25+3'B 


O comando IF é representado por 
um lozango que contém a condição: 


A SIM 
NÃO 


O comando STOP é representado 
por esta figura: 


[E 


O comando INPUT é representado 
pelo perfil de um teclado que traz o 
nome da variável: 


RE 


E o comando PRINT é representa- 
do por uma tela de vídeo: 


Existem muitos outros símbolos que 
posteriormente conheceremos. 


Estes símbolos são dispostos no pa- 
pel em segúência, de cima para bai- 
xo, representando os sucessivos co- 
mandos que comporão o programa. 
Para indicar o fluxo ou direção de um 
comando para outros, usam-se sinais 
em forma de seta. 


Muitos programas têm uma lógica 
linear. (Isto quer dizer que eles não 
têm bifurcações ou desvios através de 
IFs ou GOTOS. É o caso do programa 
abaixo, que serve para converter 
graus Fahrenheit em Celsius (escalas 
de medida de temperatura): 


«1 GRAUS F = “;C;” GRAUS C 


Observe que todo fluxograma tem 
obrigatoriamente um INÍCIO e um 
FIM, marcados pelos símbolos cor- 
respondentes. Eles não precisam ser 
necessariamente representados na 
listagem, como abaixo: 


10 PRINT “GRAUS FAHRENHEIT?" 

20 INPUT F 

30 LET C=5/9*(F-32) 

40 PRINT F; “GRAUS F ="; C; 
GRAUS C” 


Vamos ver agora um exemplo com- 
pleto de programação bem simples, 
para entender como é feito o fluxo 
grama para programas com desvios. 


Vamos fazer um programa para 
testar se um determinado número di- 
gitado pelo usuário é negativo, posi- 
tivo ou zero (já estudamos este exem- 
plo no capítulo anterior, às páginas 
37 e 38). 


O fluxograma ficaria assim (veja os 
comentários à direita): 


Como vemos, é bastante fácil vi- 
sualizar todas as alternativas a cada 
teste. Cada teste tem apenas duas saí- 
das: verdadeira (SIM), que geral- 
mente é colocada à direita do símbo- 
lo do IF, ou falsa (NÃO), que é colo- 
cada logo abaixo. 


Para iniciar a codificação em BA- 
SIC, basta numerar os símbolos se- 
quencialmente, prestando atenção 
aos desvios. À numeração é colocada 
ao lado de cada símbolo: 


INICIO 


a! 


10 


“ENTRE UM NUMERO QUALQUER” 
a ç 
30 
5 


N 


“NUMERO NEGATIVO” 


40 
s 
N 
“NUMERO POSITIVO” 
50 


“NUMERO ZERO” |). 


100 


Observe que foi necessário usar 
apenas dois comandos IF para testar 
três condições. Os comandos GOTO 
das linhas 60 e 80 têm sua necessida- 
de deduzida a partir do exame do flu- 
xograma, e não precisam ser especi- 
ficados nele (embora não seja proibi- 


Agora fica muito mais fácil escre- 
ver o programa: 


10 PRINT “ENTRE UM NUMERO 
QUALQUER” 

20 INPUT N 

30 IF N<0 THEN GOTO 70 

40 IF N>0 THEN GOTO 90 


0). 
50 PRINT “NUMERO ZERO” O símbolo do comando GOTO é 


60 GOTO 100 um círculó pequeno: 
70 PRINT “NUMERO NEGATIVO” + 
80 GOTO 100 

90 PRINT “NUMERO POSITIVO” 
190 STOP 


66 


70 


Outros simbolos bastante usados 
para fluxogramas de programação: 


Impressão em impressora (parece 
uma folha de papel rasgada): 


“RESULTADOS = “MEDIA 


O comando FOR é representado 
por esta figura: 


O comando NEXT correspondente 
tem o mesmo símbolo do GOTO: 


() 


Eles são ligados por uma linha in- 
terrompida: 


Se o desenho não cabe em uma 
única folha de papel, podemos usar o 
seguinte símbolo para indicar uma 
continuação ou mudança de página: 


Com o tempo, você terá oportuni- 
dade de usar todos estes símbolos, 


Uma boa idéia é adquirir uma ré- 
gua ou gabarito de fluxogramas, em 
papelarias ou casas especializadas 
em materiais para desenho. Ela já 
tem os elementos vazados para os 
símbolos de programação 


De agora em diante, procure sem- 
pre desenhar um fluxograma para 
cada programa, antes de tentar 
escrevê-lo em BASIC. 


Isto vai aumentar muito a qualida- 
de e correção de seus programas. 


m jogo de 
adivinhação 


Você agora tem a possibilidade de 
programar uma variedade enorme de 
jogos de sorte ou azar. Alguns deles 
são bastante simples, mas muito di- 
vertidos, e chegam mesmo a ser edu- 
cativos. 


É o caso do jogo de adivinhação 
chamado Maior ou Menor?, que va- 
mos mostrar agora como programar, 
e que serve para ensinar estes con- 
ceitos às crianças, 


O funcionamento do jogo é o se- 
guinte: 


O computador informa à criança 
que está pensando em um número si- 
tuado entre 1 e 10. Em que número 
ela acha que ele está “pensando”? 

Se a resposta que a criança der 
não for correta, o programa informa 
se o número é muito baixo ou muito 
alto, e pergunta novamente. 

Quando a criança acertar, o pro- 
grama informa quantas tentativas fo- 
ram necessárias. 


Este jogo é educativo também em 
outro sentido. Existe uma estratégia 
para acertar em menor número de 
vezes possível. Podemos deixar a 
criança jogar e descobrir sozinha 
qual é esta estratégia; ou então 
ensiná-la depois de certo tempo e ver 
se ela a aplica corretamente. 


Depois veremos qual é esta estraté- 
gia! 


Planejando o jogo 


O programa terá as seguintes fa- 
ses: 


1. mostra na tela o título do jogo e as 
instruções iniciais; 

. sorteia um número aleatório entre 
le lo; 

e pergunta um número para o joga- 

or; 

. testa se este número é igual, me- 
nor ou maior do que o sorteado; 

. se for igual, o jogador acertou. In- 
forma quantas tentativas precisou 
para acertar; 

6. se for maior ou menor, informa 
através de uma mensagem, e volta 
para o passo 3. Incrementa o nú- 
mero de tentativas. 


[6 » DS O DS) 


As variáveis do programa poderão 
ser as seguintes: 


NS - número sorteado 
A - adivinhação do jogador 


NT - número de tentativas 


Gabarito para desenho 
de fluxogramas 


Codificação em BASIC 
10 PR no “JOGO DE ADIVINHA- 


Du) N 

25 PRINT “EU VOU 
UMERO DE 

NT “10. GANHA QUEM 

DIVINHAR EM MENOS” 

NT “TENTATIVAS.” 


TC 
jts 

=" 

22»5 

“w 

= 

bs 

tm 

< 


Eus 
E 
505 
Z5 
a 

1 

s 


TNS=1 + INT (RND*10) 
NT “EM QUE NUMERO ES- 
U ir 

Ul 


38 s 
US aut 
ssee: 1 


NT A 

NS<A THEN GOTO 110 
>A THEN GOTO 120 
NT “ACERTOU EM “;NT;” 
NTATIVAS” 

OP 


NT “ERROU. TENTE UM 
pe MENOR” 


O 130 
120 PRINT “ERROU. TENTE UM 
NUMERO MAIOR" 

130 LET NT=NT+1 

149 GOTO 50 


co 
3 
Eles] 
Z 
ú 


gs 
ES 


s 

Ss 

[de] 
mat 


Exemplo de um jogo 


| 
| JOGO DE ADIVINHACAO 


EU VOU PENSAR EM UM NUMERO DE 1 A 10 
GANHA QUEM ADIVINHAR EM MENOS TENTA 
Tivas 


EM QUE NUMERO ESTOU PENSANDO? 


| JOGO DE ADIVINHACAO 


EU VOU PENSAR EM UM NUMERO DE 1 A 10 
GANHA QUEM ADIVINHAR EM MENOS TENTA 
TIVAS 

EM QUE NUMERO ESTOU PENSANDO? 6, ER 
ROU. TENTE UM NUMERO MENOR. EM QUE NU 
MERO ESTOU PENSANDO? 


3 |L 


JOGO DE ADIVINHACAO 


EU VOU PENSAR EM UM NUMERO DE 1 A 10 
GANHA QUEM ADIVINHAR EM MENOS TENTA- | 
TIVAS 


EM QUE NUMERO ESTOU PENSANDO? 6. ER 
ROU. TENTE UM NUMERO MENOR. EM QUE NU 
MERO ESTOU PENSANDO? 3. ERROU. TENTE 
UM NUMERO MAIOR. EM QUE NUMERO ESTOU | 
PENSANDO? 


Ea Ho 


4 IL 


JOGO DE ADIVINHACAO 


EU VOU PENSAR EM UM NUMERO DE 1 A 10 


GANHA QUEM ADIVINHAR EM MENOS TENTA- | 


TIVAS 


| EM QUE NUMERO ESTOU PENSANDO? 6. ER 
ROU. TENTE UM NUMERO MENOR. EM QUE NU 


MERO ESTOU PENSANDO? 3. ERROU. TENTE 
| UM NUMERO MAIOR. EM QUE NUMERO ESTOU 
PENSANDO? 4. ACERTOU EM 3 TENTATIVAS 


Coloque o programa no computa- 
dor e experimente várias vezes. 


Sugestões para modificar 
o programa 


1. Coloque os números mínimos e 
máximos (no exemplo, 1 e 10) como 
variáveis dentro do programa, po- 
dendo ser especificadas pelos co- 
mandos INPUT, logo no início do 
programa. 


2. Faça o jogador colocar o seu nome 
no início do programa e depois po- 
nha este nome nas mensagens de er- 
ro e acerto. 


3. Coloque no lugar do comando 
STOP uma pergunta: 


QUER JOGAR MAIS UMA VEZ 
(SIM OU NÃO)? 


4. Estenda o programa de modo a 
permitir a participação de dois joga- 
dores, um competindo contra o outro 
(ganha quem adivinhar em menor 
número de tentativas). 


5. Estenda o programa para adivi- 
nhação de letras do alfabeto (A, B, 
C, Detc.), ao invés de números. 


nsinando tabuada 
pelo computador 


Uma boa aplicação para a função 
RND é a criação de um grande núme- 
ro de problemas de matemática, com 
dados diferentes de cada vez. Esta é 
uma aplicação educativa do compu- 
tador, pois permite ao aluno fazer 
muitos exercícios. Além disso, cada 
aluno recebe um conjunto de exerci- 
cios totalmente diferente dos demais. 
Podemos também fazer o computador 
dar notas aos alunos, dependendo do 
número de problemas que ele acerta. 


Vamos agora desenvolver juntos 
um programa para apresentar dez 
problemas de tabuada de multiplica- 
ção, sendo um dos fatores de multi- 
plicação gerado ao acaso, entre 1 e 
10. Após a apresentação de cada 
problema, a resposta é colhida e 
comparada com a resposta certa. No 
final é atribuída uma nota ao aluno. 


Planejamento do programa 
As fases do programa serão: 


1. mostrar o título do programa e seu 
objetivo; 

. perguntar ao aluno que tabuada 
ele quer estudar; 

. sortear um número de 1 a 10; 

. mostrar na tela o problema: ta- 
buada x número sorteado; 

. entrar a resposta do aluno; 

. testar se a resposta do aluno está 
correta; 

.se estiver correta, dar os para- 
béns e incrementar o contador de 
número de respostas corretas; 

8, se estiver errada, mostrar o resul- 
tado correto; 

9. voltar para o passo 3, até que se 
esgotem os dez problemas; 

10. apresenta a nota final. 


"1 Dm Lado) NO 


As variáveis poderão ser: 


T -tabuada que quer estudar 

NA - número de acertos 

F -fator de multiplicação sorteado 
R -resposta do aluno 


70 


Fluxograma 


INICIO 
“TABUADA” 
Instruções 


“QUE TABUADA QUER 


90 


140 


ACERTOU 


NA=NA+1 


150 


“SUA NOTA FOI” 
NA 
om JE 


Codificação em BASIC 


10 PRINT “TABUADA” 
15 PRINTº=======" 
20 PRINT 
25 PRINT“VAMOS ESTUDAR TA- 
BUADA DE VEZES” 
30 PRINT “EU APRESENTO UMA 
CONTA PARA VOCE” 
35 PRINT “FAZER, E VOCÊ RES- 
PONDE, TA?” 
Tt 


T() 

HEN GOTO 40 
TO 10 

+ INT (RND'“10) 


KT, 


=" 


10 IF R=F*T THEN GOTO 140 
20 PRINT "ERROU, O RESULTA- 
DO E “:F*T 

30 GOTO 160 

40 PRINT “ACERTOU” 

50 LETNA-=NA+1 


70 NEXTI 
80 PRINT “SUA NOTA FOI ";NA 
90 STOP 


F; 
00 INPUT R 
NTR 


Coloque o programa no computa- 
dor e exercite com ele. 


Sugestões para modificar 
o programa 


1. Cologue o número de problemas 
(no exemplo, 10) como variável den- 
tro do programa, podendo ser espe- 
cificado pelo comando INPUT, logo 
no início do programa. 


2. Faça o aluno colocar o seu nome 
no início do programa, e depois po- 
nha este nome nas mensagens de er- 
ro e acerto. 


3. Coloque no lugar do comando 
STOP uma pergunta: 


QUER TENTAR MAIS UMA VEZ 
(SIM OU NÃO)? 


4. Estenda o programa de modo a fa- 
zer com que os dois fatores de multi- 
plicação variem aleatoriamente. 


5. No lugar de mensagem de acerto 
ou erro, coloque a figura gráfica de 
um palhacinho rindo ou chorando, 
respectivamente. 


RESPOSTAS AOS 


EXERCÍ 


CIOS 


ANTERIORES 
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1. Faça um programa para calcular a 
soma dos números inteiros de 1 a 100. 


Resposta: 
Versão 1 (usando IF): 


10 LET SOMA =1 

20 LET N=1 

30 LETN=N+1 

40 IF N>100 THEN GOTO 70 
50 LET SOMA=SOMA + N 
60 GOTO 30 

70 PRINT SOMA 


Versão 2 (usando FOR): 


10 LET SOMA =0 

20 FOR N=1 TO 100 

30 LET SOMA=SOMA + N 
40 NEXT N 

50 PRINT SOMA 


2. Modifique o programa acima, de 
modo a poder calcular a soma dos 
números inteiros de | a um número 


qualquer. 
Resposta: 


5 PRINT “ENTRE O NUMERO MA- 
XIMO PARA A SERIE:” 
8 INPUT MX 
10 LET SOMA =0 
20 FOR N=1 TO MX 
30 LET SOMA = SOMA + N 


3. Faça um programa como o acima, 
para calcular o fatorial de um núme- 
ro inteiro qualquer (N!). 


Resposta: 


10 PRINT “QUE NUMERO QUER O 
FATORIAL?” 

20 INPUT N 

30 LET PROD=1 

40 FOR I=2 TO N 


50 LET PROD=PROD*N 


60 NEX 
“FATORIAL DE N= 
“PROD 


8. Faça um programa para aceitar 
um nome qualquer pelo teclado, e 
em seguida fazê-lo piscar dez vezes 
seguidas, no meio da primeira linha 
da tela. 


Resposta: 


10 PRINT “ENTRE UM NOME 
LQUER:” 


50 PRINT TAB (12);N$ 

60 PAUSE 30 

70 LET N=N+1 

80 IF N<10 THEN GOTO 40 
90 STOP 


9. Faça um programa para calcular a 
soma de dez números quaisquer, di- 
gitados pelo teclado. 


Resposta: 


10 LET SOMA = 0 
20 FOR I=1 TO 10 
30 PRINT “ENTRE A PARCELA 


PRINT P 
50 LET SOMA = SOMA + P 
60 NEXT I 
70 PRINT SOMA 
80 STOP 


10. Faça um programa para imprimir 
uma tabela das raízes quadradas dos 
números de 10 a 1000, de 10 em 10. 


Resposta: 


10 PRINT “N”, “RAIZ QUADRADA” 
20 FOR N=10 TO 1000 STEP 10 
30 PRINT N,SQR(N) a 
40 NEXT N 
50 STOP 
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9.17. Faça um programa para ge- 
rar na tela todas as combinações pos- 
síveis de preenchimento do cartão da 
Loteria Esportiva. 


70 PRINT “ COLUNA *; 
80 NEXT J 
90 NEXT I 


Nota: Este programa gerará todas 
as combinações 1, 1-2, 1-3,2,2-3e3, 
mas não gerará a marcação tripla, 1- 


9.20. Faça um programa para apre- 
sentar na tela três exercícios de ta- 
buada de multiplicar e para testar se 
o resultado apresentado pelo aluno 
foi correto. O programa deve dizer, 
no fim, quantos exercícios foram re- 
solvidos corretamente pelo aluno. 
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1. Faça um programa para simular 
várias vezes o sorteio de uma moeda. 


Resposta: 


PRINT “SORTEIO DE UMA 
MOEDA” 
RAND 


PRINT 
PRINT “QUANTAS VEZES?” 


INPUT N 
FOR I=1 TON 
IF RND> 0.5 THEN 90 
PRINT “CARA” 
GOTO 100 
PRINT “COROA” 

100 NEXT I 


sSssss588a 


RESPOSTAS AO 


PRINT “3 EXERCICIOS DE TA- 
BUADA” 

PRINT 

LET N=0 

PRINT “3 x 49” 

INPUT R 


IF R<>12 ui GOTO 90 
LET N=N+ 
PRINT "ACERTOU" 
GOTO 100 

90 PRINT “ERROU” 

100 PRINT "8 x 6?” 

120 INPUT R 

130 IF R<>48 THEN GOTO 170 

140 LETN=N+1 

150 PRINT “ACERTOU” 

160 GOTO 180 

170 PRINT “ERROU” 

180 PRINT “7x 4?” 

190 INPUT R 

200 IF R<>28 THEN GOTO 240 

210 LETN=N+1 

220 PRINT “ACERTOU” 

230 GOTO 250 

240 PRINT "ERROU" 

250 PRINT 

260 PRINT “VOCE ACERTOU 
“:N;” PROBLEMAS” 

270 STOP 


RESPOSTAS AOS 
EXERCÍCIOS 
ANTERIORES 


2. Modifique o programa acima para 
contar quantas vezes saiu cara e 
quantas vezes saiu coroa, informando 
o resultado no fim. 


Resposta: 


PRINT “SORTEIO DE UMA 
MOEDA” 
RAND 


PRINT 
PRINT “QUANTAS VEZES?” 


FOR I=1 TON 

IF RND>0.5 THEN 90 
PRINT “CARA” 

LET CA=CA+1 
GOTO 100 

PRINT “COROA” 


Observação: Note como esta é uma 
maneira pouco eficiente de fazer um 
programa que apresenta programas 
repetitivamente, Um programa muito 
mais curto seria: 


10 PRINT “PROBLEMAS DE TA- 
BUADA” 


20 PRINT 

50 PRINT “QUE TABUADA?” 
60 INPUT T 

65 LETN=0 

70 FORI=1 TO 10 

80 CLS 

90 PRINT T;“X "I;“ 2” 

100 INPUT R 

110 IF R<>I*T THEN GOTO 130 
120 LETN=N+1 

125 GOTO 140 


RINT 
160 PRINT VOCE ACERTOU ".N;” 
PROBLEMAS 
170 STOP 


95 LETCO=CO+1 
100 NEXT I 
110 CLS 


120 PRINT “SORTEIO DE UMA 


140 PRINT “SAIRAM “:CA;” CA- 
RAS (":CA/N*100 ; ” %)" 

150 PRINT “SAIRAM”: Co;” CO- 
ROAS (“;CO/N*100 El 

160 STOP 


5. Faça um programa para sortear as 
cartas de um alho, mostrando o 
seu valor ou figura na tela. 
Resposta: 
10 REM --- SORTEIO DE UM BA- 


RALHO 
20 REM --- PARA MICROS TIPO. 


ç SINCLAIR 7x8] 
-— JANEIRO 85 - (C) R. 
SABATINI 


70 REM 
; PRINT “JOGO DE SORTEIO 
DE CARTAS” 


00 PRINT 

110 PRINT “QUANTAS CARTAS 
QUER SORTEAR?” 

120 INPUT NC 

130 LET NC = INT (NC) 

A IF NC<1 THEN GOTO 110 


50 REM 
160 REM --- ALCA DE SORTEIO 
DAS CARTAS 
170 REM 
180 FOR I=1 TO NC 
190 LET C=2 + INT (RND * 11) 
200 LET N=1 + INT (RND * 4) 
210 REM' 
220 cg --- MOSTRA O RESULTA- 


230 REM 
o “org “A CARTA SORTEADA 
250 IF C <11 THEN GOTO 310 
252 


REM 
254 REM --- MOSTRA VALOR DA 
CARTA 


256 REM 

260 E” Es 11 THEN PRINT “VALE- 

2m01IF C=12 THEN PRINT 
“DAMA” 


280 IF C=13 THEN PRINT “REI”; 

290 IF C=14 THEN PRINT “AS”; 

300 GOTO 330 

310 PRINT C; 

330 PRINT “ DE ”; 

340 REM 

350 REM --- IMPRIME NAIPE 
REM 


360 

370 IF N=1 THEN PRINT “ESPA- 
DAS” 

380 IF N=2 THEN PRINT “COPAS” 

390 IF N=3 THEN PRINT “PAUS” 

400IF N=4 THEN PRINT 
“OUROS” 

410 NEXT I 

420 STOP 


6. Faça um programa para imprimir 
20 sorteios de um número aleatório R, 
calculando e imprimindo em cada 
sorteio as seguintes transformações 
do programa: R * 10, 1 +INT(R*10), 
10 +INT(R*10) 


Resposta: 
10 RAND 


20 FOR I=1 TO 20 

30 LET R=RND 

40 PRINT R*10;1+INT(R'10); 
10 +INT(R*10) 

50 NEXT I 

60 STOP 
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2. Faça um programa que sorteie 
dois dados, e mostre a soma dos nú- 
meros sorteados. Se a soma for igual 
a 7, pare de sortear. Se for diferente 
de 7, sorteie novamente. 


Resposta: 
10 PRINT “O JOGO DOS 2 DA- 


40 LET Dl=1 + INT(RND*6) 
50 LET D2=1 + INT(RND*6) 
60 LET SOMA = DI + D2 

70 IF SOMA =7 THEN STOP 
80 GOTO 40 


3. Faça um programa que sorteie as 
cartas de um baralho completo, per- 
guntando antes ao jogador qual nai- 
pe ele acha que sairá sorteado. 


Resposta: 


Vamos aproveitar o programa do 
exercício 5, mostrado anteriormente. 


As linhas novas são: 182, 183, 184, 
402 e 404 


10 REM --- SORTEIO DE UM BA- 
RALHO 

20 REM --- PARA MICROS TIPO 
SINCLAIR ZX81 

30 REM --- JANEIRO 85 - (C) R. 
SABBATINI 

40 REM --===========.........onn nono. n 

50 REM 

54 RAND 

56 REM 

60 REM --- TITULO E DADOS 

70 REM 

80 PRINT "JOGO DE SORTEIO 
DE CARTAS” 


100 PRINT 

110 PRINT “QUANTAS CARTAS 
QUER SORTEAR?” 

120 INPUT NC 

130 LET NC=INT (NC) 

nd IF NC<1 THEN GOTO 110 

15 


REM 

160 REM --- ALCA DE SORTEIO 
DAS CARTAS 

170 REM 


180 FOR 1=1 TO NC 
182 PRINT “QUE NAIPE VAI DAR? 
183 PRINT “1 = ESPADAS, 2=CO- 


PAS, 3=PAUS, 4= OUR! 
184 INPUT A 


190 LET C=2 + INT (RND * 11) 
200 LET N=1 + INT (RND * 4) 
210 REM 

220 Re MOSTRA O RESULTA- 


230 REM 
240 or” “A CARTA SORTEADA 


250 IF C<11 THEN GOTO 310 

252 REM 

254 REM --- MOSTRA VALOR DA 
CARTA 

266 REM ) 

260 IF C=11 THEN PRINT “VALE- 


FE 
a Pl Rx THEN PRINT 


20 FOR 19 THEN PRINT" "REI"; 

290 IF C=14 THEN PRINT “AS”; 

300 GOTO 330 

310 PRINT C; 

330 RE “DE i 

340 Ri 

350 REM --- IMPRIME NAIPE 
REM 


360 
370 IF N=1 THEN PRINT “ESPA- 
DAS” 


380 IF N=2 THEN PRINT “COPAS” 

390 IF N=3 THEN PRINT “PAUS” 

4001F N=4 THEN PRINT 
“OUROS” 

402 IF N=A THEN PRINT “ACER- 
TOU” 


404 IF N<>A THEN PRINT “ER 
ROU” 
410 NEXT I 


5. Faça um programa para simular o 
seguinte jogo (“Porquinho”). Veja o 
enunciado completo. 


10 REM --- JOGO DO PORQUI- 
iv el ROLAR O 


50 LET SOMA=0 

60 LET D=1 +INT(RND*6) 

65 PRINT “SAIU O NUMERO “;D 

70 IF D=1 THEN GOTO 160 

80 LET SOMA=SOMA +D 

90 PRINT “VOCE AGORA TEM 
“SOMA;” PONTOS.” 

100 PRINT 

110 PRINT “QUER CONTINUAR 
(SIM OU NAO)?” 

120 INPUT R$ 

130 IF R$ = “SIM” THEN GOTO 60 

140 PRINT “COVARDE...” 

150 STOP 

160 PRINT “PERDEU TUDO...” 

170 STOP 


T U LO 


co 


S TABELAS DO 
COMPUTADOR 


Até agora, você já viu como podemos 
armazenar valores na memória do com- 
putador, pelo uso das variáveis. 


Rememorando, uma variável é um no- 
me simbólico, dado pelo programador 
a uma ou mais memórias do computa- 
dor, de modo a indicar onde será arma- 
zenado um determinado valor. Até ago- 
ra, aprendemos que existem em BASIC 
dois tipos fundamentais de variáveis: 


- as variáveis numéricas + 
- as variáveis literais (ou alfanumé- 
ricas) 


Asvariáveis numéricas servem apenas 
para armazenar números. Por exemplo: 


5 LET NUM = 12.6 
I5 LET MEDIA = (N1 + N2)/2 


No primeiro exemplo, estamos dando 
ao computador uma instrução para ar- 
mazenar o valor numérico 12.6na variá- 
vel que chamamos de NUM. 


No segundo exemplo, estamos dando 
uma instrução para armazenar na variá- 
vel chamada MEDIA, o resultado da ex- 
pressão aritmética à direita do sinal de 
igualdade (que por sua vez está usando 
o conteúdo de duas outras memórias, ou 
seja, N1 e N2). 


As variáveis literais, por sua vez, ser- 
vem para armazenar palavras frases, 
etc., ou qualquer outra seguência de 
simbolos que o computador consiga ge- 
rar. Por exemplo: 


12 LET NOMES = “TANCREDO 
NEVES” 


15 LET ESPACOS = * ú 

20 LET XINGAS = “$%..&...78 29" 

30 LET AVIAOS = “Bana” 

Observe que é necessário colocar o si- 
nal de cifrão ($) no final donome de uma 


variável literal, o que serve para “avisar” 
ao computador que aquela variável de- 
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verá ser usada para armazenar caracte- 
resenão valores numéricos. (Por exten- 
são, dizemos que esse tipo de variável 
serve para armazenar valores literais, 
embora eles não sejam exatamente 
valores.) 


Além disso, podemos ver, pelo tercei- 
ro exemplo, que é possível armazenar 
caracteres gráficos dentro de uma variá- 
vel literal. Para conseguir istono TK 85, 
basta pressionar as teclas SHIFT e 9, lo- 
go depois de termos digitado o primei- 
ro sinal de aspas: 


Esta combinação de teclas causa o 
aparecimento do cursor (G na linha de 
entrada, o que possibilita a digitação de 
caracteres gráficos, a partir daí: 


Depois de digitar os gráficos, devemos 
pressionar de novo asteclas SHIFT e9, 
para podermos teclar o sinal de “fecha 
aspas”. 


Você deve se lembrar também de que 
onome de uma variável literal pode re- 
presentar mais do que uma “caixinha” 
na memória do computador (reveja o es- 
quema da página 27). Na realidade, ca- 
da letra ou caractere entre as aspas irá 
ocupar uma memória após a outra. O 
conjunto de memórias usado para ar- 
mazenar todos os caracteres de um va- 
lor literal recebe o nome técnico de cor- 
dlão, neste caso (o nome correspondente 
em inglês, string, também é muito 
usado). 


Neste capítulo, vamos conhecer um 
novo tipo de conjunto. Com ele, pode- 
mos utilizar um nome único de variável, 
para armazenar vários valores separa- 
dos. Eles são chamados de conjuntos in- 
dexados e são muito úteis para se colo- 
car na memória do computador coisas 
organizadas na forma de tabelas. 


Para entender melhor como funciona 
um conjunto desse tipo, vamos "bolar” 
um programa para construir uma tabe- 
la dos pontos ganhos pelos vários times 
de futebol em um campeonato. 


Uma maneira de realizar isto com as 
variáveis “normais” que você aprendeu 
até agora seria: 


10 PRINT “CAMPEONATO BRASI- 
LEIRO DE FUTEBOL 

20 PRINT" TABELA DE PONTOS 
GANHOS” 

30 PRINT 

40 REM 

50 REM === ENTRADA DE 
DADOS 

60 REM 

70 PRINT “ENTRE O NUMERO DE 


PONTOS GANHOS” 
75 PRINT “PARA CADA TIME DA 
TABELA:” 
89 PRINT 
90 PRINT “TIME NUMERO 1 ? "; 
100 INPUT T1 
10 PRINT TI 
120 PRINT “TIME NUMERO 2? ”: 
130 INPUT T2 
140 PRINT T2 


eassim por diante. Teríamos que colo- 
car, em seguida, várias linhas seme- 
lhantes, para entrar os valores dostimes 
T3, T4, T5etc., até incluir todos ostimes 
(quantos existissem!). 


Emseguida, poderíamos escrever um 
outro pedaço do programa, para mos- 
traronúmero médio de pontos do cam- 
peonato, por exemplo: 


400 LET MEDIA = (TI + T2 + T3 
+ T4 + T5)5 

410 PRINT 

420 PRINT “MEDIA DOS PONTOS 
GANHOS = "MEDIA 

430 STOP 


Você já percebeu que esse método de 
programação é muito trabalhoso, e mui- 
to limitado: 


— tenho que definir de antemão o nú- 
mero de times que vão figurar na tabe- 
la. Se este número mudar depois, terei 
quemodificar o programa em vários lu- 
gares (inclusive na fórmula da linha 


00); 


— quanto maior for o número de times, 
mais comprido será o programa, emais 
trabalhoso será escrevê-lo. 


Porisso, seria ideal se pudéssemos usar 
umúniconome para as variáveis TI, T2, 
T3 etc, Assim, poderíamos guardar os 
diversos valores numéricos em “caixi- 
nhas” ligadas umas nas outras, mais ou 
menos como no caso das variáveis li- 
terais. 


Felizmente, existe esse tipo de variável 
conjunta na linguagem BASIC. Com 
ela, podemos utilizar um único nome 
(porexemplo, T) para a área de memó- 
riaque armazenará os pontos ganhos de 
cada equipe: 


área de memória 


variável T [12 [10]9[5]3] 
número da 1 2345 
memória 


Para colocar um valor nesse tipo de va- 
riável, podemos usar um comando LET 


ou comando INPUT: 
100 INPUT T(1) 


O valor entre parênteses, que vem de- 
pois do nome do conjunto, é chamado 
de índice ou subscrito. Ele indica qual 
éa “caixinha” onde será colocado o va- 
lor digitado pelo teclado. Neste exem- 
plo, a memória indicada é a 1, ou seja, 
o número de pontos ganhos será arma- 
zenado para o primeiro time. Outro 
exemplo: 


SS LET T(5) = 3 


Agui, estamos dando a seguinte ins- 
trução ao computador: 


PEGUE o número 3 e ARMAZENE na 
para número 5 da variável chama- 
a 


Da mesma forma que os comandos 
LET e INPUT, podemos usar uma variá- 
vel indexada dentro de outras instru- 
ções, como o PRINT. Por exemplo, se 
dermos a instrução: 


56 PRINT T (5) 
estamos querendo dizer: 


PEGUE o valor contido na “caixinha” 
número 5 da variável Temostrenatela. 


Ou ainda: 
57 LETSOMA = T(1) + T(2) 
o que quer dizer: 


SOME os valores contidos nas memó- 
riasle2davariável T, earmazeneore- 
sultado na variável chamada SOMA. 


As memórias chamadas T(1), T(2), T(5) 
etc., neste exemplo, recebem onome de 
variáveis indexadas, porque são assina- 
ladas por um índice, ou seja, o número 
de ordem delas, no conjunto. 


Asmemórias T(1), T(2) etc. são chama- 
das também de elementos de T. 


Também são muito usados estes no- 
mes: varíaveis subscritas (indexadas) e 
subscritos (índices). 

Quando queremos ler em voz alta (pro- 
nunciar) o nome de um elemento subs- 
critado, falamos assim: 

B(5) béíndice5 ou bê sub 5 
G(N) gê índice ene ou gê sub ene 


Portanto, um conjunto ocupa na me- 


mória uma série de “caixinhas” indivi- 
duais, cujo “endereço” consiste num no- 
me comum, seguido do subscrito, entre 
parênteses: 


conteúdo 


endereço 


À grande vantagem desse tipo de va- 
riável é que os índices dos elementos 
também podem ser variáveis. 


Veja este exemplo: 


1000 LET V(1) = 456 

1010 LET V(2) = 132 

1020 LET V(3) = 111 

1030 PRINT 

1040 PRINT “QUE VALOR QUER 
VER (1, 2OU 3)? ”; 

1050 INPUTN 

1060 PRINT N 

1070 PRINT “VALOR = "“;V(N) 

1080 GOTO 1030 


— Às linhas 1000 1010 e 1020 servem 
para colocar valores numéricos dentro 
dos elementos 1, 2e 3 do conjunto V. 


— As linhas 1040 e 1050 servem para 
perguntar ao usuário qual é o número 
de ordem do elemento que ele quer ver 
na tela (este número é armazenado na 
variável N). 


— À linha 1060 serve para mostrar na 
tela o conteúdo do elemento N do con- 
junto V! 


Eis como ficaria um exemplo de utili- 
zação do programa: 


Primeiro vamos examinar o conteúdo 
do segundo elemento do conjunto (pa- 
ra isto digitamos o valor 2, quando apa- 
rece a pergunta na tela): 


O programa mostra o valor pedido, em 
seguida repete a pergunta. Agora que- 
remos examinar o elemento número 1: 


+ 


ornando 
o programa 
mais eficiente 


Vamos usar agora o nosso conheci- 
mento a respeito das variáveis indexa- 
das, para modificar o programa da tabe- 
la de pontos do campeonato. Inicial- 
mente, vamos fazer um programa para 


cinco times apenas: 


10 PRINT “CAMPEONATO 
BRASILEIRO DE FUTEBOL" 

20 PRINT* TABELA DE PONTOS 
GANHOS” 

30 PRINT 

40 REM 

50 REM === ENTRADA DE 
DADOS 

60 REM 

70 PRINT “ENTRE O NUMERO DE 
PONTOS GANHOS” 

75 PRINT “PARA CADA TIME DA 
TABELA:” 
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80 PRINT 
85 FORN = 1 TOS 
90 PRINT “TIME NUMERO “;N;" ? "; 
100 INPUT T(N) 
110 PRINT T(N) 
120 NEXT N 
130 REM 
140 REM === CALCULO DA 
MEDIA 
150 REM 
160 LET SOMA = 0 
170 FORN = 1 TOS 
180 LET SOMA = SOMA + T(N) 
190 NEXT N 
20) REM 
210 REM === MOSTRA 
RESULTADOS 
220 REM 
400 LET MEDIA = SOMA/5 
410 PRINT 
420 PRINT “MEDIA DOS PONTOS 
GANHOS = "MEDIA 
430 STOP 


Eis aqui um exemplo de utilização do 
programa: 


CAMPEONATO BRASILEIRO DE 
FUTEBOL 
TABELA DE PONTOS GANHOS 


ENTRE O NUMERO DE PONTOS 
GANHOS PARA CADA TIME DA 
TABELA: 


TIME NUMERO 1 ? 23 
TIME NUMERO 2 ? 12 
TIME NUMERO 3? 9 
TIME NUMERO 4? 7 
TIME NUMEROS ? 4 


MEDIA DOS PONTOS 
GANHOS = 11 


Vamos entender agora como funciona 
o programã. 


Para isto, vamos fazer o oposto do que 
foi ensinado para você. Vamos fazer 
agora o fluxograma do programa (nor- 
malmente ele deve ser feito antes deste 
ser escrito, lembra-se?). 


Para representar uma alça dotipo FOR 
... NEXT, usamos os blocos abaixo: 


Gu) 


EEE : À primeira alça, que vai da linha 85 a 
modo, o programa ficaria assim: 120 serve para entrarmos sucessiva- 
mente os times de 1 a 5. À variável N é 
usada como contadora da alça e, ao 
e tempo, como índice do conjun- 
to T. 


Esta é uma técnica muito usada na pro- 
gramação de conjuntos, e se chama in- 
dexação indireta. 

+»! “ENTRE O NUMERO DE PONTOS GANHOS” 
r “PARA CADA TIME DA TABELA:” Você pode ver que, a cada valor de N 
incrementado pelo FOR, o programa re- 
ferencia um novo valor de T nas linhas 
100 (INPUT) e 110(PRINT). Ao mesmo 
tempo, serve também para indicar ao 
FORN = 1TOS usuário qual o número do time para o 
qualele deve digitar os pontos ganhos. 


Valor de N Elemento Valor digitado 


“TIME NUMERO “;N;” ? ”; referenciado | (exemplo) 
1 T(1) 
2 T(2) 12 
3 T(3) 9 
4 T(4) 
5 T(5 4 


A segunda alça, que vai das linhas 170 
a 190 serve para calcular a soma dos 
pontos ganhos por todos os times. Esse 
valor será usado no cálculo da média, 
dividindo-o depois por 5. Para servir co- 
mo acumuladora, usamos a variável SO- 
MA, que deve ser zerada antes da entra- 
da na alça (linha 160). 


Portanto, como você viu, o programa fi- 
cou muito mais bem escrito, conciso e 
eficiente. 


Podemos perceber mais facilmente a 
utilidade do conjunto indexado se tiver- 
mos que mudar o número de times. Por 
exemplo, se fossem dez times em vez de 
cinco, teríamos que mudar apenas as li- 
nhas 85, 170e 400: 


85FORN = 1 TO IO 
IZ0FORN = 1TO IO 
400LET MEDIA = SOMA/10 


MEDIA = SOMA/5 Você já percebeu que seria muito mais 


fácil colocar o número de times como 
uma variável NT, que seria perguntada 
ao usuário logo no início do programa, 


“MEDIA DOS PONTOS GANHOS = “MEDIA assim: 
52 PRINT “QUANTOS TIMES ?” 
54 INPUTNT 
Assim, o programa fica muito maisge- 
nérico, ou seja, pode ser usado em qual- 


quer situação, sem necessidade de 'se 
mudar o programa a cada momento. 
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Outra modificação interessante que 
podermos fazer ainda é mostrar denovo, 
em umatela limpa, os valores digitados, 
antes da média. Isto é possível porque 
eles estão todos armazenados no con- 
junto T. 


Portanto, o nosso programa modifica- 
do fica assim agora: 


10 PRINT “CAMPEONATO 


BRASILEIRO DE FUTEBOL" 
20 PRINT “ TABELA DE PONTOS 
GAN r 
25 PRINT”  VERSAO 2" 
30 PRINT 
40 REM 


50 REM === ENTRADA DE 
DADOS 


51 REM 
52 PRINT “QUANTOS TIMES ?” 
54 INPUT NT 
70 PRINT “ENTRE O NUMERO DE 
PONTOS GANHOS” 
75 PRINT “PARA CADA TIME DA 
TABELA:” 
80 PRINT 
85 FORN = ITONT 
90 PRINT “TIME NUMERO "“;N;"? "; 
100 INPUT T(N) 
110 PRINT T(N) 
120 NEXTN 
130 REM 
140 eia = CALCULO DA 


170 FOR N=1 TONT 

175 PRINT “TIME NUMERO “;N;” = 
“T(N); “PONTOS GANHOS” 

180 LETSOMA = SOMA + T(N) 


210 REM === MOSTRA 
RESULTADOS 


220 REM 

400 LET MEDIA = SOMA/NT 

410 PRINT 

420 PRINT “MEDIA DOS PONTOS 
GANHOS = “MEDIA 

430 STOP 


A tela com os resultados ficaria assim 
agora: 


TIMENS 1 = 23PONTOS GANHOS 
TIMENº 2 = 12 PONTOS GANHOS 
TIME Nº 3 = 9PONTOS GANHOS 
TIME Nº 4 = 7 PONTOS GANHOS 
TIME Nº5 = 5 PONTOS GANHOS 


MEDIA DOS PONTOS 
GANHOS = 11 
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Um conjunto indexado, como o que 
você viu nos exemplos acima, pode ser 
considerado também como se fosse uma 
lista. O outro nome técnico que se dá a 
esse tipo de conjunto é vetor. 


Para diferenciar uma variável numéri- 
ca, que só pode armazenar um valor de 
cada vez, de uma variável conjunta, usa- 
mos a seguinte nomenclatura: 


variável numérica simples = 
ESCALAR 
variável numérica conjunta = 
VETOR 


A nomenclatura acima é tirada da ál- 
gebra linear (uma parte da matemática). 


Quantos elementos pode ter um con- 
junto na memória? 

Existem algumas limitações quanto ao 
emprego desses elementos no BASIC do 
computador que você está usando. 


Inicialmente, um conjunto numérico 
pode ter no máximo, dez elementos, o 
que dá para algumas aplicações, mas pa- 
ra outras é muito pouco. Por exemplo, se 

iséssemos colocar todos os times da 
Ciro Ball, seria muito mais do que dez, 
eo computador não aceitaria. 


Entretanto, existe um jeito de colocar 
mais de dez elementos em um conjunto. 


Para isto, temos que declarar previa- 
mente ao computador quantas memórias 
ele tem que reservar para o conjunto, se 
ele for conter mais de dez elementos. 


O comando pelo qual se faz essa de- 
claração chama-se DIM (que significa 
DIMensão). 


Dimensionamento é o termo que usa- 
mos para dizer quantos elementos, no 
máximo, conterá o conjunto. 


No exemplo dos times, se quiséssemos 
colocar um máximo de setenta times, por 
exemplo (N = 70), seríamos obrigados a 
colocar no programa a seguinte linha: 


.45 DIM T(70) 


Esta declaração está dizendo ao 
computador: 


RESERVE uma dimensão de setenta 
elementos para o conjunto chamado T. 


Outras limitações de memória para o 
dimensionamento dos conjuntos são às 
seguintes: 


- um conjunto não pode ter mais de 
65535 elementos. Se este número for ul- 
trapassado por engano, o computador 
indicará a mensagem de erro tipo B; 


- cada elemento de um conjunto ocu- 
pa quatro bytes. A soma dos números de 
todos os elementos de conjuntos dimen- 
sionados implicitamente (isto é, menos 
de onze elementos) e explicitamente 
(pelo comando DIM) não deve ser supe- 
rior à quantidade de memória central 
disponível (o que está sobrando, fora o 
programa). 


Se, na execução de um programa, à 
quantidade de memória não for suficien- 
te para todas as variáveis e conjuntos de- 
finidos, o computador indicará um erro 
tipo 4. isso acontece, muitas ve- 
zes o número da linha onde ocorre o er- 
ro (que, na mensagem de erro na tela, 
aparece depois do sinal /) pode estar in- 
completo ou errado, devido também à 
falta de memória. Por exemplo, a mensa- 
gem 4/200 poderá aparecer incompleta, 
assim: 4/2, dando uma indicação falsa. 


Igumas regras 
para o DIM 


Podemos repetir o comando DIM pa- 
ra quantos conjuntos houver no meu pro- 
grama. Deve-se usar um comando DIM 
para cada conjunto. 


10 DIM A(65) 
15DIM B(12) 
20 DIM FG(8) 


Observe, nesse exemplo, que o cor 
junto FG, por ter menos de oito elemen- 
tos, não precisa ser colocado na linha 
DIM. Entretanto, muitos programadores 
têm hábito (aliás, muito salutar) de decla- 
rar no começo do programa todas as va- 
riáveis indexados, para fins de doc 
mentação. 


Outra regra importante para o uso do 
DIM é que ele pode ser colocado em 


qualquer ponto de um programa, porém 
sempre antes de ser referenciado o com 


junto pela primeira vez. 


Assim, estaria errado o seguinte 
programa: 


10 FORI=1 TO 100 
20 INPUT T(1) 

30 NEXTI 

40 DIM T(100) 


O programa só iria indicar o erro 
quando, durante a execução, a variável 
contadora 1 atingisse o número 11. Isso é 
explicado pelo fato de que o interpreta- 
dor BASIC “garante” a dimensão de um 
conjunto, mesmo que não declarado em 
DIM, até dez elementos! O erro indica- 
do pelo computador será de tipo 3 (subs- 
crito fora da faixa). 


Em consegiência, outra regra muito 
importante para o uso correto do DIM é 
quenão se deve dimensionar um conjun- 
tocomum número menor do que valor 
dimensionado. Por exemplo: 


5 DIM T(50) 

10 FOR I=1 TO 100 
20 LET T(D)=0 

30 NEXTI 


O programa iria executar normal- 
mente, até atingir 1 = 51, quando então 
oíndice na linha 20 seria maior do que 
acapacidade do conjunto T. 


Os conjuntos numéricos definidos em 
BASIC têm a seguinte característica im- 
portante: existe sempre um elemento nu- 
merado com o zero. Por exemplo: T(0) é 
um elemento válido do conjunto dimen- 
sionado T: 


DIM T(5) 


Elle je e]s| 


Esse elemento pode ser usado por co- 
mandos INPUT, LET, PRINT etc., sem 
problemas. Por isso, o conjunto T dimen- 
sionado como no exemplo acima, na rea- 
lidade tem seis elementos do comando 
DIM disponíveis, e não cinco, como po- 
deria parecer. Você pode decidir usá-lo 
ou não, dependendo da finalidade do 
programa. 


Finalmente, outra particularidade da 
declaração DIM. 


Nos computadores com a lógica Sin- 

clair, isto é, o TK83, o TK85, o CP200 etc, 

redeclarar um conjunto, ou se- 

ja, mudar a sua dimensão em pontos di- 
ferentes do programa. Por exemplo: 


10 DIM A(10) 
20 FORI=TO 10 
30 LET A(1)=1 


40 NEXTI 
50 DIM A(5) 


etc. 
Neste caso, o conjunto À inicial é can- 


celado da memória (e com ele os dados 
armazenados), e é dimensionado um 


conjunto À com apenas cinco elementos. 


E preciso observar entretanto, que is- 
so não é permitido na linguagem BASIC 
padrão e em muitos outros computado- 
res. Nesses outros computadores é neces- 
sário dar antes o comando ERASE ou 
CLEAR, dependendo da marca, para 
“limpar” a memória para outro conjunto 
com o mesmo nome. 


EXENIEdAnE 


1. Indique abaixo se uma variável éinde- 
xada do tipo vetor (V), indexada do tipo 


matriz (M) ou escalar (E) 
A(3)--- A3--- X(5) --- ZZ2--T(12,14)--- 
N(7)--- 1 -- 1(2,2)--- 122---VETOR -—- 


2. Modifique o programa de cálculo dos 
pontos ganhos dos times, de modo que 
mostre na tela de resultados qual a dife- 
rença entre o número de pontos ganhos 
por cada time e a média geral. Por 
exemplo: 

TIME NUMERO 1 = 23 PONTOS 

GANHOS. DIFERENCA DA ME- 

DIA = 12 PONTOS 

TIME NUMERO 2 = 12 PONTOS 

GANHOS. DIFERENCA DA ME- 

DIA = 1 PONTO 


etc. 
3. Sejao conjunto C, com cinco elemen- 
tos. Preencha os elementos de À com os 
valores abaixo: 


3.1. C(0) 
C(1)+C(3)/2 
c(1)+2 


Eagora escreva abaixo o que cada um 


Pe ia pa 


3.2. 10 FORI=0 TO5 
20 PRINT C(I); 
30 NEXTI 


3.3. 10 LETN=3 
20 PRINT C(1)+C/ (N+2) 
30 PRINT N+2 + C(N-3) 

3.4. 10 LET C(5)=C(C(0)) 
20 PRINT C(5);C(0) 


4. Considere queosconjuntos A eBeas 
variáveis escalares X, Y e Z abaixo rece- 
beram os seguintes valores: 


A(1) 5 B(03 x 0 
A(2) 25 B(D)123 Y1 
A3) 9 B2255 Z2 


E indique agora quais serão os 
valores am pelos comandos 
abaixo: 


PRINT A(U) — 
PRINT Z 


PRINT B(Z) --- 
PRINT A(A(1)-Z)-- 


PRINT A(B(0)) ---- 
PRINT B(Y)-Y ---. 


5. Indique o que cada programa abaixo 
mostrará na tela: 


20 FORI=0 TO8 


50 PRINT VET (0, VET(2), 
VET (4), VET(6), VET(8) 


5.2. 10 DIM A(10) 
20 DIM B(10) E 
30 FORI=I TO 10 
40 LET A(D=I 
50 LET B(l)= 10-1 
60 NEXTI 
70 LETSOMA=Q 


- abelas e matrizes 


O comando DIM também pode ser 
usado para definir na memória outro ti- 
po de conjunto: as tabelas ou matrizes. 


Umatabela consiste em um arranjo de 
elementos de memória dispostos em 
duas dimensões. Por exemplo, as notas 
dos alunos de uma classe, nas várias 
matérias: 


MATERIAS 


1 2 3 
MATEMATICA PORTUGUES HISTORIA 


ALUNONº 
1 8s 5 9 
2 6.5 10 45 
3 75 8 5 
4 2 3 1.5 


Uma tabela é organizada em linhas e 
colunas. No exemplo acima, as linhas 
são os alunos. Cada linha contém, no 
exemplo, três colunas, correspondentes 
às matérias. 


Na memória do computador, esses da- 
dos seriam armazenados da seguinte 
forma: 


COLUNAS 


LINHAS 


Um elemento de uma tabela ou matriz 
é indicado por dois subscritos, em vez de 
um: o número da linha, seguido pelo nú- 
mero da coluna. 


Por exemplo: 


O ELEMENTO na LINHA 3e COLU- 
NA 2é iguala 8. 


Ele corresponde à nota de Português 
do aluno nº 3. 


Da mesma forma como nos conjuntos 
numéricos que você aprendeu até ago- 
ra (vetores) podemos usar um único no- 
me de variável para indicar uma tabela. 
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Por exemplo, o conjunto acima poderia 
ser chamado de NOTA. 


E necessário usarmos a declaração 
DIM, também no caso dastabelas, para 
indicar ao computador qual é a área de 
memória que ele precisa reservar para 
armazenar o conjunto. 


No exemplo acima, usaríamos a de- 
claração. 


DIM NOTA (4,3) 


DIM NOTA: nome da variável 
(4,3): nº de linhas e nº de colunas 


A referência a um elemento de um 
conjunto desse tipo é feita da seguinte 
forma: 


PRINT NOTA (3,2) 


PRINT NOTA: nome da variável 
(3,2): índice da linha e índice da coluna 


Dizemos que o conjunto NOTA acima 
é um conjunto bidimensional, isto é, ele 
tem duas dimensões (linhas e colunas). 


Oconjunto C(5), por exemplo, é então 
chamado, por analogia, de unidimensio- 
nal (só tem uma dimensão). 

Não confunda o termo dimensão com 
o tamanho (ou dimensionamento) deum 
conjunto expresso pela declaração DIM. 

DIM A(25) —» oconjunto A tem 
uma dimensão e 
está dimensiona- 
do para 25 ele- 


DIM B(2035) » o conjunto B tem 
duas dimensõese 
está dimensiona- 
do para 20 linhas 
e 35 colunas 


Na referência a um elemento de uma 
tabela ou matriz, os subscritos (índices 
de linha e coluna) também podem ser 
variáveis ou expressões: 

PRINT A(X,5) 

INPUT B(J) 

LET (1,1) = B(X+25Y + 14-2) 
etc. 

É preciso lembrar também que o ele- 
mento O é automaticamente reservado 
em uma tabela de duas dimensões, com 
o comando DIM. Por exemplo: 

DIM NOTA (4,3) 
gera automaticamente os elementos 
NOTA (0) 


NOTA (0,1), NOTA (0,2) .... 
NOTA (0,3) 


NOTA (1,0), NOTA (0,2) .... 
NOTA (0,3) 


É mais fácil entender a correspondên- 
cia entre subscritos de um conjunto bidi- 
mensional, e sua organização na memó- 


mentos ria, examinando o esquema abaixo: 
COLUNAS 
0 2 3 
0  NOTA(0,0) NOTA(O1) NOTA(0,2) | NOTA ta 
1 NOTA(,O)  NOTA(L]) NOTA(2)  NOTA(I3) 
2 NOTA(20) NOTA(QI) NOTA(22) NOTA(3 
LINHAS 3  NOTA(30)  NOTA(3]) NOTA(32)  NOTA(3 
4º NOTA(40)  NOTA(4L) — NOTA(42) NOTA (4 


Portanto, o número de elementos de uma tabela é igual a: 


(mimero de linhas + 1) x 
DIM NOTA (4,3) tem: 


Nesse caso, você já está percebendo 
que é desvantajoso deixar de utilizar os 
elementos com subscrito O em uma ma- 
triz, pois estaríamos desperdiçando mui- 
to espaço. No exemplo acima, oito ele- 


(número de colunas + 1) 
(4+1) x (3+1) = 20 elementos 


mentos da matriz ficarão em branco (em- 
bora ocupem espaço na memória) se não 
forem usados. Quanto maior a matriz, 
maior será o número de elemento 
(O desperdiçados. 


Tal como acontece com os vetores 
(conjuntos unidimensionais), usamos as 
alçastipo FOR...NEXT para realizar pro- 
gramações com conjuntos bidimensio- 
nais. Nesta seção aprenderemos alguns 
trugues dessas programações. 


Vamos tomar como exemplo, inicial- 
mente, o seguinte problema: como pode- 
mos programar a entrada das notas de to- 
dos os alunos nas três matérias em uma 


tabela na memória? 


Existem várias maneiras de resolver 
esse problema. Vamos ver as três técnicas 
principais: 


1. Sem alças 


O programa para entrada dos dados 
poderia ser feito assim: 


O programa teria que repetir doze ve- 
zes cada linha PRINT e INPUT acima, 
para as três notas de cada aluno da 
classe. 


Já vimos que esse método é bastante 
ineficiente, produz programas muito lon- 
gos e repetitivos, e não pode ser expan- 
dido com facildiade. Somente se justifi- 
ca seu uso quando o número de ele- 


mentos da matriz a ser entrada é muito 
pequeno. 


2. Com uma alça 


Evidentemente, uma maneira mais fá- 
cile sintética de se resolver o problema 
acima é usar uma alça FOR...NEXT pa- 
ra gerar, repetitivamente, os índices do 
conjunto NOTA, para cada aluno. 


Note que a alça que vai da linha 20 até 
a linha 90 repete sempre a mesma se- 
quência de entrada de três notas, para 
cada um dos quatro alunos. 


A variável de controle I da alça é usa-. 


da para variar o índice de linha da matriz 
NOTA. A sua ação seria semelhante à 
geração de doze comandos INPUT su- 
cessivos, assim: 


1 comando 


1 INPUT NOTA (1,1) 
INPUT NOTA (1,2) 
INPUT NOTA (1,3) 


2 INPUT NOTA (2,1) 
INPUT NOTA (2,2) 
INPUT NOTA (2,3) 


3 INPUT NOTA (3,1) 
INPUT NOTA (3,2) 
INPUT NOTA (3,3) 


e assim por diante. 


Esse método ainda tem também a des- 
vantagem de levar-nos a alterar o progra- 
ma, se o número de matérias (e de notas 
poraluno) for maior do que 3. Entretan- 
to, se o número de colunas da matriz for 
pequeno, a técnica pode ser usada. 


3. Com duas alças “ 


Evidentemente, essa é a técnica mais 
genérica e sintética (ou seja, com ela po- 
demos escrever um programa que faça a 
mesma coisa que os outros, pl um nú- 


mero menor de linhas de BASIC). 


Essa técnica utiliza duas alças 
FOR...NEXT, uma dentro da outra. Uma 
alça é utilizada para controlar os índices 


Vejao que apareceria na tela do com- 
putador, quando o programa fosse 
executado: 


ALUNO 1 NOTA 1? 
ALUNO 1 NOTA 2? 
ALUNO 1 NOTA 3? 
ALUNO 2 NOTA 1? 
ALUNO 2 NOTA 2? 
ALUNO 2 NOTA 3? 
ALUNO 3 NOTA 1? 


etc. 
até completar todos os alunos e notas. 


A alça externa, coma variável I, serve 
para aumentar o índice da matriz NOTA, 
deleml. 


À alça interna, coma variável], serve 


Observe que precisamos mudar ape- 
nas as linhas 20 e 30 


Agora a sequência de mensagens na 
tela ficaria assim: 


ALUNO 1 NOTA 1? 
ALUNO 2 NOTA 1? 
ALUNO 3 NOTA 1? 
ALUNO 4 NOTA 1? 
ALUNO 1 NOTA 2? 
ALUNO 2 NOTA 2? 
ALUNO 3 NOTA 2? 


das linhas (estudantes), e a outra, para 
controlar os índices das colunas (notas): 


ai ps ama ta é 
E presen la3 


po aluno | nota] 


para aumentar o índice da matriz NOTA, 
deleml. 


Desse modo, dizemos que a alça inter- 
na varia (aumenta) mais depressa quea 
alça externa. 


Em outras palavras, para cada alunol, 
oíndice] varia de 1 a 3. Portanto, a entra- 
da dos dados é feita por colunas. 


Poderíamos, neste exemplo, ter adota- 
do uma outra forma de entrada dos da- 
dos: entrar as notas de cada um dos alu- 
nos, para cada uma das matérias. Por 
exemplo, primeiro entraríamos todas as 
notas de Matemática, depis de Português 
e depois de História. 

Esse programa teria uma pequena di- 


ferença em relação ao anterior. Qual 
seria? 


ALUNO 4 NOTA 2? 


etc. 
até completar todos os alunos e notas. 


À alça externa, com a variável], serve 
para aumentar o índice da matriz NOTA, 
deleml. 


Aalçainterna, coma variável I, serve 
para aumentar o índice da matriz NOTA, 
deleml. 


abelas de qualquer 


tamanho 


Uma grande vantagem do esquema 
de programação com duas alças é que 
podemos fazer um programa para qual- 
quer número de alunos ou de matérias, 


10 DIM NOTA (50, 15) 
12 PRINT “QUANTOS AL 


Observe que demos agora uma capa- 
cidade maior à matriz NOTA, de modo a 
comportar notas de até 50 alunos e 15 
matérias. 


Novamente, com apenas duas peque- 
nas mudanças nas linhas 20 e 30 do pro- 
grama, ele continua sendo válido para 
qualquer número de alunos e de notas 
(desde que não ultrapassem os limites 
impostos pela declaração DIM, é claro!) 


CLS 
100 FOR 1=1 TO 4 
110 FOR]=1 TO 3 =» repetir 
120 PRINT “ALUNO”; 1; "NOTA"; ],“-"; NOTA (1, ) 
140 NEXT] S + próxi 


- 160 NEXTI 


Este programa mostraria na tela o se- 
guinte resultado (com os dados da tabe- 
la de exemplo): 


ALUNO 1 NOTA 1 = 8.5 
ALUNO 1 NOTA 2 = 5 
ALUNO 1 NOTA 3 = 9 
ALUNO 2 NOTA 1 = 6.5 
ALUNO 2 NOTA 2 = 10 
ALUNO 2 NOTA 3 = 4.5 


90 CLS 

100 FOR 1=1 TO 4 

105 PRINT “ALUNO”; E; “-”; 

10 FOR]=1 TO3 

Ta PRINT TAB (J*10 +3); NOTA (1); 


pois o valor limite das alças le] pode ser 
entrado como uma variável do 


programa. 
Veja o exemplo abaixo: 


---» pergunta número de alunos (NA) 


---» próxima nota do aluno I 


+» próximo aluno 


As alças “embutidas” (ver página 53) 
podem ser utilizadas também para mos- 
trar o conteúdo dos elementos de uma 
matriz, por meio do comando PRINT, ou 
para cálculos (por exemplo, cálculo das 
médias de cada aluno). 


Veja o exemplo abaixo, ainda utilizan- 
do a tabela de notas: 


+» limpa a tela 
---» repetir para alunos de 1 a 4 
paranotasdela3 


próxima nota do aluno 1 
---—» próximo aluno 


ALUNO 3 NOTA 1 = 7.5 


etc. 

É óbvio que essa não é uma maneira 
muito elegante de apresentar uma tabela 
de notas. 

Mas, com pequenas modificações no 
programa, podemos fazer isso facilmen- 
te. Observe a diferença: 


---» limpa a tela 

--—» repetir para alunos de 1 a 4 
-—» repetir para notas de 1a 3 
---» próxima nota do aluno 1 
---» próximo aluno Ê 


Agora os resultados aparecerão assim 


ALUNOlI- 85 5 9 
ALUNO2- 65 ID 45 
ALUNO3- 7.5 8 5 
ALUNO4- 2 3 15 


Vamos entender como essa parte do 
programa funciona: 


A linha 105 escreve na tela a palavra 
ALUNO, seguida do seu número (no ca- 
so, o conteúdo da variável I, que é au- 
mentada de 1 em 1 pela alça da linha 
100). O ponto-e-vírgula colocado no fi- 
nal dessse comando assegura que o pró- 
ximo comando PRINT escreva na mesma 
linha (logo após o sinal de subtração). 


Alinha 120 escreve natela todas astrês 
notas para o aluno |, sempre na mesma li- 
nha, pois também tem um ponto-e- 
vírgula no seu final. 


A expressão que usa a função TAB 
serve para alinhar (colocar nas mesmas 
colunas, na vertical) cada uma das notas 
das matérias. 


Relembrando, a função TAB n vai mo- 
ver a posição de impressão (cursor) na 
tela, até a coluna n. TAB significa tabu- 


O mesmo esquema de duas alças tam- 
bém pode ser utilizado para realizar cál- 
culos ou comparações lógicas com os 
elementos de uma matriz. 


Vamos imaginar, por exemplo, que 


190 LET SOMA = 0 
200 FORI=1 TO 4 
210 FOR]=1TO3 


* 220 LETSOMA=SOMA + NOTA (1,1) 


240 NEXTI 

250 LET MED = SOMA/12 
260 PRINT 

270 PRINT “MEDIA = “; MED 


Essa parte do programa, portanto, pe- 
garia cada um dos elementos da matriz 
NOTA em seguida, através da variação 
dos índices 1 e ], e somaria à variável 
SOMA. 


Não precisamos, necessariamente, fa- 
zer variar os dois índices da matriz NO- 


lação, e funciona exatamente como ota; 
bulador de uma máquina de escrever. 
muito útil, portanto, para a programação 
de tabelas. 


À expressão entre parênteses será cal- 
culada, dentro de cada repetição dele 
J, e irá determinar esta nova posição n: 


J valor da expressão (110 +3) 
1 (1x 10 + 3) 13 
2 (2x 10 + 3) 23 
3 (3x10+3) E] 


Portanto, vemos que cada nota come- 
gará nas colunas 13, 23e 33 da mesmali- 
nha, respectivamente. 

O comando PRINT na coluna 150, Por 
gua vez, serve para passar o cursor para 
alinha seguinte. Se ele não fosse coloca- 
do aí (ou seja, depis de terminar todas as 
notas de uma linha, ao final da alça )), as 
notas do próximo aluno continuariam a 
ser mostradas na mesma linha do aluno 
anterior, pois existe um ponto-e-vírgula. 
Colocando-se o PRINT sozinho, essa li- 
nha é encerrada, e passar-se à próxima. 


Experimente colocar o programa no 
computador e retirar a linha 150 para ver 
o que acontece! 


queremos saber qual foi a média de todas 
as notas tiradas para a classe. 

Para isso, primeiro vamos ter que so- 
mar todas as notas contidas na matriz 
NOTA, e depois dividir pelo total de no- 
tas, certo? 


---» zerar um acumulador 

---—» repetir para alunos de 1 a 4 
---» repetir para notas de la 3 
---» acumular a soma com a nota 
---+ próxima nota do aluno 1 

---» próximo aluno 

---»calcula a média 


TA, através de alças FOR...NEXT. 


Vamos imaginar, por exemplo, que 
queremos saber apenas a médida das 
notas de todos alunos para uma determi- 
nada matéria. Para isto, a variável SOMA 
deveria seg acumulada apenas com os 
valores da coluna desejada: 


se 
E 
: 


---» zerar um acumulador 
---»repetir para alunos de 1 a 4 


310 LET SOMA = SOMA + NOTA (1,1) ---» acumular a soma com a nota 
320 NEXTI , ---» próximo aluno 
330 LET MED = SOMA/4 ---» calcula a média 
340 PRINT 
350 PRINT “MEDIA DE MATEMATICA = "; MED 


Note que a linha 310 soma apenas os 
elementos 


NOTA (1,1) NOTA(2,1) NOTA (3,1) 
e NOTA (4,1) 


Isso ocorre porque o índice da coluna 
(no caso, coluna 1) está fixo dentro do 


programa, ou seja, é uma constante que 
não varia, ao passo que o índice de linha 
(alunos) varia de 1 a 4, através da alça I 
da linha 300. 


Para tornar mais geral esta parte do 
programa, poderíamos perguntar ao 
usuário de que matéria ele deseja saber 
a média. 


280 PRINT “ENTRE QUE MATERIA (1, 2OU 3);” 
285 INPUT M 
29) LET SOMA = 0 ---+» zerar um acumulador 
300 FORI=1 TO 4 ----» repetir para alunos de | a 4 
310 LET SOMA = SOMA + NOTA (L,M) ---» acumular a soma com a nota 
NEXTI ----» próximo aluno 
---» calcula a média 


PRINT 
PRINT “MEDIA DE MATERIA “; M;" = 


Ou ainda, poderíamos obter automa- 
ticamente as médias para todas as maté- 


" MED 


rias, usando uma alça externa para fazer 
variar os índices de coluna: 


280 FORM=1 TO3 ---—» repetir para matérias de la 3 
290 LET SOMA = (0 ---» zerar um acumu! 

300 FORI=1 TO 4 | À ---» repetir para alunos de 1 a 4 
310 LET SOMA = SOMA + NOTA (L,M) ---» acumular à soma com a nota 
320 NEXTI ----» próximo aluno 

Ed MED = SOMA/4 ---» calcula a média 


Observe que estamos usando as mes- 
mas variáveis, SOMA e MED, para o cál- 
culo da média de cada nota. Isso real- 
mente não tem importância, pois não 


PRINT 
350 PRINT “MEDIA DE MATERIA '; M;" = "; MED 
NEXT M 


---» próxima matéria 


queremos armazenar os valores das mé- 
dias de todas as matérias. A variável SO- 
MA, portanto, deve ser zerada dentro da 
alça externa, e fora da alça interna. 
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Vamos fazer agora um programa com- 
»leto, utilizando o exemplo das notas de 
ima classe. 


Neste programa queremos fazer o 
seguinte: 


1. entrar as notas de cada aluno, emto- 
das as matérias; 


2. mostrar essas notas na tela, em for- 
ma de tabela. Aproveitamos para 
calcular e mostrar a médida aritmé- 
tica de cada aluno, nessa tabela; 


3. calcular e mostrar a médida de ca- 
da matéria. 


10 REM = ============= 
20 REM = e 


CLAS; 
30 REM = BASIC PARA TK 85 
40 REM = R. SABBATINI ABRIL 1985 


(6) 
70 REM **** INICIALIZACAO **** 


80 REM 

90 DIM NOTA(50, 15) 

100 CLS 

110 PRINT “CALCULO DO 
BOLETIM DE NOTAS” 

120 PRINT * 

130 REM 

140 REM **** ENTRADA DE 
PARAMETROS **** 

150 REM 

160 PRINT 

170 PRINT “NUMERO DE ALUNOS 
NA CLASSE ?”; 

180 INPUT NA 

190 IF NA > E 170 

200 PRINT N 

210 PRINTº NUMERO 
MATERIAS ?”; 

220 INPUT NM 

230 IF NM > 15 THEN GOTO 210 

240 PRINT NM 

250 REM- 

260 REM **** ENTRADA DE 
DADOS **** 

2170 REM 

280 PRINT “ENTRE AS NOTAS DOS 
ALUNOS: 

290 PRINT 

300 FOR I=1 TONA 

310 PRINT A Nº“ 

320 FOR]=1 TO 

330 PRINT TAB (7); DENOTA DA 


se 


MATERIA ";J;* 2"; 
340 INPUT NOTA(L]) 
350 IF NOTA(L]) < 0 THEN 


GOTO 340 
360 IF Dao J) > 10 THEN 


G 
370 PRINT NOTA(IJ) 
380 NEXT] 
390 REM 
400 REM **"" MOSTRA NOTAS NA 


1 
410 REM **** E CALCULA 
MEDIAS **** 


440 FORI=1 TONA 

450 PRINT “ALUNO "1º -"; 

460 LET SOMA= 0 

470 FOR]=1 TO NM 

480 PRINT TAB(10+5*]);NOTA(1]); 

490 LETSOMA=SOMA+NOTA(,) 

500 NEXT] 

510 PRINT “ MED ";SOMA/NM 

520 NEXTI 

530 REM 

540 REM **** CALCULA MEDIA 
DAS MATERIAS **** 


570 LETSOMA=0 
580 FOR I=1 TONA 
590 LETSOMA=SOMA +NOTA(L]) 


620 LET MED=SOMA/NA 
630 PRINT no NA MATERIA 


nm — 
Ji =", 


640 NEXTI 
650 STOP 
[E] 
BB... 
B E nálise do 


Vamos analisar o programa linha por 
linha, agora, para podermos entender o 
que elas fazer: 


10a50 -Nestaslinhas colocamos um 
cabeçalho interno de iden- 
tificação do programa (au- 
tor, data, computador etc.). 


9 -Dimensionamento do con- 


junto NOTA. 


100 a 120 -Mostrar título do programa 
na tela (para que serve). 


170 a 180 -Pergunta quantos alunos 
tem, e entra na variável NA. 


190 -Testa se NA émaior doque o 


permitido pelo comando 
DIM. Se isto acontecer, pe- 
gunta novamente. 


200 a 210 -Pergunta quantas matérias 
tem, eentrana variável NM. 


220 -Testa se NM é maior do que 
o permitido pelo comando 
DIM. Se isso acontecer, per- 
gunta novamente. 


286 a 290 -Dá instruções para entrada 
de dados. 


300 -Alça de repetição dos 
alunos. 


310 -Mostra identificação do alu- 
no a ser entrado. 


320 - Alça de repetição das maté- 
rias por aluno. 


330 a 340 -Pergunta nota. 


350 a 360 -Testa se a nota está entre 0e 
10. Em caso contrário, per- 
gunta a nota de novo. 


440 a 520 -Parte do programa que mos- 
tra as notas na tela. 
Na linha 460, zera o soma- 
dor de notas de um aluno. 
Nalinha 490, efetua esta so- 
ma, e na linha 510 mostra a 
média. 


560 a 640 -Parte do programa que cal- 
cula as médias das matérias. 


Coloque agora o programa no compu- 
tador e teste com os dados da tabela de 
exemplo deste capítulo. 


às seguintes questões (exem- 
de resposta na primeira linha): 


“1. Quais são os subscritos de linha e 
dos elementos cujo conteúdo é: 


oconjunto DADOS acima. 


2. Escreva um programa com a alça 
FORNEXT, para preencher com dados 
os elementos do conjunto DADO (por 
meio de um comando INPUT). 


3. Escreva um programa para preen- 
cher com zeros todos os elementos do 
conjunto DADO. 


4. Explique o que realizam os progra- 
mas abaixo, e qual o resultado mostra- 

do pelo comando PRINT na linha 100, 
tomando como dados o conjunto DA- 
DOS acima: 


4.1. 10 PR=1 


4.2. I0LETS=0 
15 FORI=2 TO 4 STEP 2 
20 FOR]=ITO 4 
30 LET S=S+DADO(L]) 


5. Faça um programa para copiar uma 
das linhas da matriz DADO, para um ve- 


tor (conjunto unidimensional) chamado 
COPIA. 


6. Faça um programa para copiar uma 
das colunas da matriz DADO, para um 
vetor chamado COPIA. 


7. Escreva um programa para preen- 
chercom ovalor | todososelementos da 
diagonal principal de um conjunto 
A(10,10). 


Dica: Diagonal principal é o conjunto 
detodos oselementos da matriz que têm 
o mesmo índice de linha e de coluna. 
Por exemplo: os elementos A(1,1), 
A(2,2), A(3,3)... etc. estão na diagonal 
principal. 


8. Indique qual o erro nos programas 
abaixo: 
8.1. 10 DIM A(7,6) 

20 FORI=0 TO 7 

30 LET A(1,7)=1 

40 NEXTI 


8.2. 10 FOR]=2 TO 100 STEP 3 
15 LET B(,10)=B(J,1)*2 
20 NEXT] 


30 DIM B(100,10) 
8.3. 10 DIMX (50,10) 
20 FORI=1 TO 10 
30 FOR]=1 TO 50 
40 LET X(L,])=0 
50 NEXTI 
60 NEXT] 
9. Indique se as linhas de programa 
abaixo estão certas (C) ou erradas (E). 
Caso estiverem erradas, explique onde 
está o erro: 
PRINT XX(A+5,10) 
LETC(1;2)=896 
PRINT A218(B5,B5+3 — T*4) 
PRINT CONJ(4,5) 
PRINT B(67000,2) 
PRINT X(3.2,4.55) 
10. Modifique o programa completo de 
cálculo de boletim de notas, da seção 
anterior, de modo a realizar as seguin- 
tes funções adicionais: 


a. Calcular a média global da classe 
(todas as notas). 


b. Indicar, ao lado da média de cada 
aluno, se ela está acima ou abaixo da 
média global da classe. 


istas de nomes 


Também podemos programar em BA- 
SIC uma variável conjunta alfanuméri- 
ca. No exemplo dos times, poderíamos 
então armazenar os nomes dostimes em 
uma lista, assim: 


25 LET TIME$(1)=“PALMEIRAS” 

26 LET TIMES(2)="SANTOS” 

27 LET TIME$(3)="CORINTHIANS” 
28 LET TIMES$(4)=“FLAMENGO” 
29 LET TIME$(S)="FLUMINENSE” 


e assim por diante. 


Dimensionar um conjunto literal como 
este é um pouco mais complicado do 


Se usarmos o comando DIM com uma 
variável literal simples, estaremos auto- 
maticamente limitando onúmero de ca- 
racteres que esta variável irá aceitar. Por 
exemplo: 


10 DIM LETRAS$(10) 
20 LET LETRAS$=* HIKL 
MNOPORSTUVXZ” 
Neste caso, o comando 
30 PRINT LETRAS$ 


irá mostrar apenas este resultado (as dez 


que dimensionar um conjunto numéri- 
co (um vetor). 


Como você deve se lembrar, um cordão 
alfanumérico ("string") é armazenado 
no computador como uma série de me- 
mórias interligadas. Ou seja, uma variá- 
vel literal simples já é um conjunto de 
memórias. 


Normalmente, podemos encher uma 
variável literal simples com até 255 ca- 
racteres, sem necessidade deusaro co- 
mando DIM (ou seja, é diferente do con- 
junto numérico, que só permite dez ele- 
mentos nessas condições). 


primeiras letras foram aceitas no coman- 
do LET da linha 20): 


ABCDEFGHI] 

Para dimensionar um conjunto literal, 
portanto, podemos utilizar uma tabela 
como se fosse uma página com várias li- 
nhas de tamanho fixo: 

10 DIM T$(5,15) 


Isso equivale a um conjunto de duas di- 
mensões, organizado assim: 
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O primeiro número entre parênteses 
no comando DIM especifica o número 
de linhas que constam do conjunto, ou 
seja, quantos nomes separados eu pode- 
rei colocar na minha lista. 


O segundo número entre parênteses 
(depois da vírgula) corresponde ao nú- 
mero de colunas que constam do con- 
junto, ou seja, quantos caracteres, no 
máximo, poderá ter cada nome dalista. 


Como no caso dos conjuntos numéri- 
cos, existe um elemento 0 que é reserva- 
do automaticamente (você pode usá-lo 
ou não, à vontade). 


A única diferença em relação a um 
conjunto numérico é que não existe a 
coluna numerada zero, ou seja, ela não 
é ocupada por um caractere do cordão. 


Preenchendo com os nomes dos times 
do exemplo acima, teríamos: 


0 ua a 
o epa popa aa sn 
à Asanfrio Di l 
a jojojajiÍNio] ES ENCIE 
+ jriLjajmien|eiol | | jd l 
So pRILIDIMIIIN] ejnpstel (IT 


Você deve ter notado dois fatos interes- 
santes aqui: 


1. Alinha do começo do conjunto (linha 
0) está vazia. 


2. Sobram espaços em branco depois 
dos nomes dostimes, em cada linha, 
se estes tiverem menos do que os 
quinze caracteres dimensionados. 


O primeiro fato pode ser explicado 
porque tínhamos colocado os co- 
mandos: 


Ss 


qr wr-e 
e) 
(O) 


25 LET TIME$(1)=“PALMEIRAS” 

26 LET TIME$(2)="SANTOS” 

27 LET TIME$(3)="CORINTHIANS” 
28 LET TIMES(4)="FLAMENGO” 
29 LET TIMES$(5)=“FLUMINENSE” 


Mas nada impediria que colocás- 
semos: 
24 LET TIMES(0)=“SÃO PAULO” 


E, neste caso, a linha O também seria 
ocupada: 


ando nome 
aos bois 
o 


Vamos refazer agora o programa de 
entrada dos pontos ganhos por time de 
futebol, colocando também os nomes 
dos times. 


Um programa para entrar os nomes 
dos times, por exemplo, seria assim: 


10 DIM TIME$(5,15) 

20 FOR I=1 TO 5 

30 PRINT “NOME DO TIME NS";1,º?"; 
40 INPUT TIMES() 

50 NEXTI 


Note que o número de subscritos na 
declaração DIM é diferente do número 
de subscritos na declaração INPUT, 
quando se trata de conjuntos de cor- 
dões. Isso não acontece em conjuntos 
numéricos: ambos os números precisam 
ser iguais. 


Podemos aproveitar a alça de entrada 
do programa dos times de futebol para 
colocar também duas linhas que possi- 
bilitem a entrada do nome: 


10 PRINT “CAMPEONATO 
BRASILEIRO DE FUTEBOL" 

20 “TABELA DE PONTOS GANHOS” 

30 PRINT 

35 DIM TIMES$(5,15) 

40 RE 


M 

50 REM -:: ENTRADA DE DADOS 

70 REM 

70 PRINT “ENTRE O NUMERO DE 
PONTOS GANHOS” 

75 PRINT “PARA CADA TIME DA 
TABELA: 

80 PRINT 

85 FORN=1 TOS 

90 PRINT “NOME DO TIME 
NUMERO ";N;* 2”; 

95 INPUT TIMES(N) 

96 PRINT TIMES(N) 

98 PRINT “NUMERO DE PONTOS 
GANHOS ?”; 

100 INPUT T(N) 

110 PRINT T(N) 

120 NEXT N 

130 REM 

140 REM =: CALCULO DA MEDIA 

150 REM . 

160 LET SOMA= 0 

170 FORN=I TOS 

180 LET SOMA=SOMA + T(N) 

190 NEXT N 

200 REM 


210 REM==- MOSTRA RESULTADOS 
220 REM 
400 LET MEDIA = SOMA/5 


410 PRINT 

420 PRINT "MEDIA DOS PONTOS 
GANHOS = “MEDIA 

430 STOP 


Eis aqui um exemplo de utilização do 
programa: 


id aro DE 
FUTE 
TABELA DE PONTOS GANHOS 


ENTRE O NUMERO DE PONTOS 
(GANHOS PARA CADA TIME 
DA TABELA: 


NOME DO TIME NUMERO 1 ? 
PALMEIRAS 

NUMERO DE PONTOS GANHOS ? 23 
NOME DO TIME NUMERO 2 ? 
SANTOS 

NUMERO DE PONTOS GANHOS? 12 
NOME DO TIME NUMERO 3 ? 
CORINTHIANS 

NUMERO DE PONTOS GANHOS ? 9 
NOME DO TIME NUMERO 4 ? 
FLAMENGO 

NUMERO DE PONTOS GANHOS ? 7 
NOME DO TIME NUMERO 5 ? 
FLUMINENSE 

NUMERO DE PONTOS GANHOS ? 4 


MEDIA DOS PONTOS GANHOS = 11 


Você deve estar perguntandó à esta al- 
tura: Por que entrar os nomes dos times, 
se eles não são usados em nenhum outro 
lugar do programa? 


Realmente, se for só para informar no 
momento de entrada de dados, é desne- 
cessário entrar os nomes dos programas. 


Porém, uma vez que já temos os nomes 
armazenados no conjunto TIMES, po- 
demos usá-los para outros fins. 


Vamos supor que queremos modificar 
o programa acima, de modo a mostrar 
na tela o seguinte resultado: 


Para fazer isso, tiramos a linha 430 do programa anterior e adicionamos: 


430 CLS 
440 PRINT TAB( 5)"TIME"; 
TAB(15);"PONTOS”; 
450 MEDIA TAB(22); “DIFERENCA 
DIA 


460 FOR I=1 TO 5 
470 PRINT) 1º "TIMES(); 
TAB(7)TOTAB(T; :;MEDIA - T(I) 
EXT 


490 STOP 


A expressão da linha 470 mostra os 
dados de entrada e a diferença dos 
pontos ganhos por cada time, em rela- 
ção à média calculada. 


Portanto, para realizar estetipo de cál- 
culo, bem como mostrar os resultados, é 
necessário usar conjuntos para armaze- 
namento intermediário dos dados. 


istas internas 
de nomes 


Muitos programas utilizam listas de no- 
mes e outros dados, que podem ser de- 
finidos como fixos, dentro dos mesmos, 
em vez de serem entrados por meio de 
comandos INPUT. 


Em muitos computadores, existem dois 
comandos (READe DATA) que facilitam 
bastante a definição interna detais listas. 
Entretanto, os computadores com a lógi- 
ca SINCLAIR (por exemplo, o TK83, 
TK85, CP200tc., no Brasil) não têm es- 
tes comandos no seu interpretador BA- 
SIC. Por isso, temos que usar algunstru- 
ques e assim contornar essa falta. 


O mais comum, se o número de ele- 
mentos dos conjuntos não for muito 
grande, é defini-los no programa por 
meio de declarações LET. 


90 


Vamos tomar um exemplo. 


Suponhamos que o dono de uma loja 
de frios queira emitir uma nota de des- 
pesas para cada cliente que efetua com- 
prasna sua loja. Os produtos que eletem 
para vender são fixos, e podem constar 
do programa. Para cada cliente ele digi- 
ta a quantidade comprada e o preço por 
quilograma da mercadoria. Em segui- 
da, aparece a nota na tela, com o total 
das despesas, bem como o nome valor 
de cada mercadoria comprada. 


Vamos definir o conjunto M$, que 
contém os nomes das mercadorias, e os 
conjuntos Q e PR, que contêm quanti- 
dade e preço, respectivamente. 


10 CLS 

20 PRINT ad DE NOTA DE 
DESPES, 

30 PRINT "ÉASA DE FRIOS” 
“AZEITONA DOURADA" LTDA” 

40 PRINT 

50 DIM M$(5,20) 

55 DIM TT(5) 

(01) sn ue EMONAS, 

AS” 


PRE 
70 LET M$(1)=“AZEITONAS: 


VERDES” 
[e] e M$(2)="PRESUNTO 
90 LET Meg = "PRESUNTO 
MAGRO 
100 LET M$(4)="MOZARELA" 
10 LET M$(5)="QUEIO PRATO” 
20 REM 


130 REM ***** ENTRADA DOS 

DADOS DA COMPRA ***** 

140 REM 

50 PRINT “DIGITE A QUANTIDADE 
COMPRADA E DEPOIS” 

160 PRINT “O PREÇO POR 
QUILOGRAMA PARA 

CADA MER -” 

70 PRINT "CADORIA APRESENTA- 
DA NA TELA. DIGITE 0º 

180 PRINT “SE O CLIENTE NAO 

COMPROU A MERCADORIA" 

190 PRINT 

200 FOR I=1 TOS 

210 PRINT M$(1); “2” 

220 INPUT O() 

230 IF O(D)= (0 THEN GOTO 250 

240 INPUT PR(I) 

250 NEXTI 

260 REM 

270 ou es Renee | IMPRESSAO DA 


280 REM 

290 CLS 

300 PRINT * 
DE DESPESAS” 

310 PRINT 

320 PRINT “MERCADORIA”; 
TAB(17);"QUANT PRECO” 

325 LET TOT= O 

330 FORI=1 TOS 

349 IF Q(1)= 0 THEN GOTO 360 

350 PRINT M$(D;TAB(17);O(T); 
TAB(22):O(D)*PR() 

355 LET TOT=TOT+ Q(1)*PR(I) 

360 NEXTI 

365 PRINT “TOTAL':TAB(22);TOT 

370 PAUSE 600 

380 CLS 

390 GOTO 150 


Ocomando IF da linha 230 serve para 
testar se a quantidade comprada foi ze- 
ro. Neste caso, o programa não pede o 
preço depois. 


O comando IF da linha 350 testa tam- 
bém se a mercadoria tem valor zero de 
quantidade, e passa para a linha 350 de 
apresentação, neste caso. 


1. Modifique o programa de emissão de 
nota de despesas, de modo a ter as se- 
guintes funções adicionais: 


a. entrar a data de emissão da nota e o 
nome do cliente, para mostrarna tela de 
emissão; 


b. armazenar o valor total de cada nota, 
cumulativamente em uma variável REN- 
DA, e mostrar este valor se o nome do 
cliente for “FIM”. 


2. Modifique o programa de cálculo de 

boletim de notas (página 87 ), afim de 

EEN Da a a de cola 
uno. 


istas mais 
complexas 


Muitos programas necessitam de 
várias listas alfanuméricas relaciona- 
das entre si. 


Vamos tomar como exemplo o se- 
guinte problema de programação: 


Queremos fazer um programa para 
entrar pelo teclado e armazenar na 


Note que os elementos NOMES (5), 
ENDEREÇOS (5) e TELEFONES (5), 
por exemplo, contêm dados da pes- 
soa nº 5 em nossa caderneta. 


Organizando os dados dessa for- 
ma, será mais fácil programar as di- 
versas funções que caracterizam um 
programa de cadastramento de infor- 
mações, como é o caso da nossa ca- 
derneta de endereços. 


Programas desse tipo têm normal- 
mente as seguintes funções (partes do 
programa que realizam daterminadas 
tarefas em relação aos conjuntos de 
dados): 


- incluir na caderneta os dados de 
uma pessoa; 


AGENDA TK 
CADERNETA DE ENDERECOS 


1 INCLUIR UM NOME 
2 MODIFICAR DADOS 
3 INFORMAR DADOS 
4 FIM 


DIGITE UM NUMERO: 


memória do computador uma cader- 
neta de endereços de amigos e co- 
nhecidos. (Gostaríamos que neste 
programa os dados relativos a cada 
pessoa fossem armazenadas em listas 
separadas: 


NOMES -lista dos nomes das 


pessoas 


ENDEREÇOS lista dos endereços 


TELEFONES listas dos telefones 


Assim, por exemplo, os dados so- 
bre as pessoas seriam armazenadas 
nos elementos das listas: 


- procurar o telefone ou endereço 
de uma determinada pessoa; 


- modificar os dados de uma pessoa 
(por exemplo, se ela mudou de te- 
lefone ou de endereço). 


Uma forma bastante simples e mui- 
to utilizada de programar a opção do 
usuário por estas funções é um menu. 


Na gíria de computação, um menu 
é uma lista das opções disponíveis de 
processamento dentro de um deter- 
minado programa, apresentada ao 
usuário para que ele selecione uma. 


Em nosso programa, um exemplo 
prático de menu seria: 


Dn título do menu 
nano. lista de comandos 
ag-mensosoaa comando para terminar o 
programa 
o 
Esc EsaRaAgo mensagem de solicitação 


” 


À apresentação deste menu geral- 
mente é colocada logo no início do 
programa: 


40 CLS 

50 PRINT *“ AGENDA TK” 

60 PRINT “CADERNETA DE 
ENDERECOS” 

70 PRINT 

80 PRINT * 

90 PRINT “= 


100 PRINT “1 
UM NOME” 
120 PRINT “2 
DADOS” 
130 PRINT “3 
DADOS” 
150 PRINT “4 
160 PRINT“ 


170 PRINT 


COMANDOS:" 


INCLUIR 


MODIFICAR 
INFORMAR 


180 PRINT “DIGITE UM 
NUMERO: 


190 IMPUT OPCAO 
200 IF OPCAO <1 THEN 


GOTO 190 
210 IFOPCÃO >4 THEN 
GOTO 190 


A linha 190 fica aguardando até 
que o usuário digite um número cor- 
respondente à opção que ele deseja 
executar. 


As linhas 200 e 210 testam se o nú- 
mero digitado está situado entre 1 e 4 
(as opções disponíveis). Se for digita- 
do um número diferente destes, o 
programa retornará à'linha 190, até 
que a entrada esteja correta. 


A partir daí, a estrutura do progra- 
ma poderá ser a seguinte: 


INICIO 


Apresentação 
do menu 


VOLTA PARA MENU 


Explicando: 


Após a escolha do usuário, o pro- 
grama desvia para o segmento apro- 
priado, que irá realizar aquela fun- 
ção. Depois de terminá-la, retorna ao 
início do programa, para apresentar 
de novo o menu (exceto quando o 
Eri escolhe terminar o progra- 
ma). À 
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Essa estrutura permite que o usuá- 
rio do programa realize facilmente 
uma série de tarefas, na ordem que 
julgar mais interessante, sem necessi- 
dade de “decorar” comandos por ex- 
tenso ou ser obrigado a seguir uma 
ordem inflexível de processamento. 


Continuando a programação, de- 
vemos dimensionar previamente os 
conjuntos alfanuméricos que serão 
utilizados: 


37 DIM NOMES (50,25) 
38 DIM ENDERECOS (50,25) 
39 DIM TELEFONES (50,10) 


Note que dimensionamos a cader- 
neta para um máximo de 50 nomes de 
25 caracteres cada, mais os endere- 
gos, também de 25 caracteres cada, e 
os telefones, com 10 caracteres cada. 


Portanto, a quantidade de memória 
a ser ocupada por esses conjuntos se- 
rá de: 


50x 25 + 50x 25 + 50x 10 = 
3 000 caracteres 


Portanto, atenção: o programa não 
poderá ser utilizado em microcompu- 
tadores com dois kbytes de memória 
(versão básica do TK 82 e do TK 83); 
apenas em computadores de maior 
capacidade. 


Para armazenar um número maior 
ou menor de endereços, basta alterar 
os valores nos comandos DIM. 


Observe também que cada infor- 
mação tem um limite máximo em nú- 
mero de caracteres, e estes serão 
“podados"” automaticamente se ultra- 
passaram esse limite de comprimen- 
to. 


Agora, podemos verificar qual foi 
a opção dada pelo usuário e desviar o 
programa de acordo com o resultado: 


250 IF OPCAO = 1 THEN GOTO 
260 TF OPCAO 2 THEN GOTO 
270 TF OPCAO = 3 THEN GOTO 
280 rc OPCAO = 4 THEN STOP 


Agora, a partir da linha 309, colo- 
camos o setor de entrada de dados. 
Vamos definir a variável NUM para 
contar o número de endereços arma- 
zenados na caderneta. Inicialmente, 
é claro, ele será zero. A cada entrada 
na caderneta de uma nova pessoa, 
esse número será incrementado por 
mais um: 


300 LET NUM = NUM + 1 

3101F NUM>25 THEN GOTO 900 
320 CLS 

330 PRINT “ENDERECO NO.”;NUM 
335 PRINT “===============" 
340 PRINT “NOME:” 

345 INPUT NOME$ (NUM) 

350 PRINT “ENDERECO:” 

355 INPUT ENDERECOS (NUM) 

360 PRINT “TELEFONE:” 

365 INPUT TELEFONES (NUM) 

370 GOTO 40 


A linha 310 tem por objetivo impe- 
dir a entrada de mais de 25 nomes, 
pois assim “estouraria” a capacidade 
dimensionada para os conjuntos. 


A seguir programamos o segmento 
de modificação de dados. Inicial- 
mente mostramos no alto da tela co- 
mo estão os dados da pessoa solicita- 
da, e depois pedimos os dados novos: 


4MCLS 

410 PRINT “ENTRE O NUMERO DO 
REGISTRO A SER 
MODIFICADO:” 

415 INPUT X 

4201F X<1 THEN GOTO 415 

425 IF X>25 THEN GOTO 415 

430 PRINT 

435 PRINT “ENDERECO NO.";X 


440 PRINT “===============" 


445 PRINT “NOME”; bo 

450 PRINT “ENDERECO:”, 
ENDERECOS(X) 

455 PRINT “TELEFONE:”; 
TELEFONES(X) 

460 PRINT “NOVO NOME:” 

465 INPUT NOME$(X) 

470 PRINT “NOVO ENDERECO:” 

475 INPUT ENDERECOS(X) 

480 PRINT “NOVO TELEFONE:” 

485 INPUT TELEFONE$(X) 

490 GOTO 40 


Finalmente, podemos programar o 
segmento de procura. Nesse caso, o 
usuário deve fornecer o nome da pes- 
soa desejada (exatamente como está 
gravado no conjunto NOMES), e o 
programa procurará: 


SOBCLS 

510 PRINT “DIGITE O NOME DA 
PESSOA:”; 

520 INPUT X$ 

530 PRINT X$ 

540 FOR I= 1 TO NUM 

550 IF X$< > NOMES(I) THEN 
GOTO 580 

560 PRINT “ENDERECO:”; 
ENDERECOS(1) 

565 PRINT “TELEFONE:”; 
TELEFONE$(I) 

570 PAUSE 600 

575 o 40 

580 NEXT 

590 PRINT" 'NAO CONHECO ESTE 


NOME" 
595 GOTO 510 


Se todos os nomes forem testados 
(linha 550) e não for achado o pedi- 
do, o programa avisa ao usuário, 
após terminar a alça da linha 580. 


Temos agora o nosso programa 
completo, com os comentários nos lu- 
gares apropriados: 


14 REM "Ut stress dos e a 


15 REM* PROGRAMA AGENDA 1.M + 
20 REM* PARA LOGICA SINCLAIR + 
25 REM* PROGRAMA R. SABBATINI * 


30 REM States sa sina aaa ds aa aee 


34 LETNUM=0 

37 DIM NOMES(50,25) 

38 DIM ENDERECOS$(50,25) 
39 DIM TELEFONES(S0, 10) 


49 CLS 

50 PRINTº AGENDA TK” 

a na “ CADERNETA DE ENDERECOS” 

80 PRINT" COMANDOS:” 

90 PRINT" ===================== eme) 
100 PRINTº1 INCLUIR UM NOME” 
120 PRINTº2 MODIFICAR DADOS” 
130 PRINTº3 INFORMAR DADOS” 
150 PRINTº4 FIM” 


EM 
174 REM ***** SOLICITAR E TESTAR OPCAO ***** 


176 REM 

180 PRINT“DIGITE UM NUMERO:” 
190 INPUT OPCAO 

20) IFOPCAO<1 THEN GOTO 190 
210 IFOPCAO >4 THEN GOTO 190 
212 REM 


214 REM ***** DIMENSIONAR CONJUNTOS ***** 


216 REM 

242 REM 

244 REM ***** DESVIAR PARA OPCAO ***** 

246 REM 

250 IFOPCAO = 1 THEN GOTO 300 

270 IFOPCAO =2 THEN GOTO 400 

280 IFOPCAO =3 THEN GOTO 500 

290 IFOPCAO =4 THEN STOP 

292 REM 

294 REM ***** ADICIONAR NOMES ***** 
296 REM 


30 LETNUM=NUM+1 

310 IF NUM >25 THEN GOTO 9% 
320 CLS 

póre a “ENDERECO NO “NUM 


Sao PRINT NOME: Es 

345 INPUT NOMES(NUM) 

350 PRINT “ENDERECO:” 

355 INPUT ENDERECOS(NUM) 

360 PRINT “TELEFONE:” 

365 INPUT TELEFONES(NUM) 

370 GOTO 40 

380 REM 

382 REM ***** MODIFICAR DADOS ***** 

384 REM 

4m CLS 

410 PRINT “ENTRE O NUMERO DO REGISTRO 
A SER MODIFICADO: 

415 INPUTX 

420 IFX<1 THEN GOTO 415 

425 IFX>25 THEN GOTO 415 

430 PRINT 

435 PRINT “ENDERECONO.";X 

440 PRINT" ==============="" 

445 PRINT “NOME:":NOMES(X) 
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Digite este programa no computa- 
450 PRINT “ENDERECO:"; ENDERECOS(X) 
455 PRINT “TELEFONE”. ; TELEFONESOO dor e teste-o com vários dados. 
460 PRINT “NOVO NOME: 
UTNO X 


o PEINTNCÃO Epempco: | a 
Do EpER DO 
TELEFONE: 


492 
494 REM ***** PROCURA DADOS ***** 
496 REM 


SM CLS 
S10 PRINT “DIGITE O NOME DA PESSOA;”: 
520 INPUT X$ 


530 PRINT X$ 

540 FORI=1 TO NUM 

Es E X$ dpi Rs THEN GOTO 580 
E PRINT “ENDERECO:”; ENDERECOS(I) 
565 PRINT “TELEFONE:"; ; TELEFONES() 
570 PAUSE 600 

575 GOTO 40 


580 NEXTI 
590 PRINT “NÃO CONHECO ESTE NOME” 
595 GOTOSI1O 


8 a 
aa... 

n [4] | E atrizes 
8 8 pm alfanuméricas 
n [2 


Da mesma forma como podemos ter NOMES -lista dos nomes das Nesse novo esquema, teríamos 
conjuntos numéricos bidimensionais pessoas uma matriz (chamada DADOSS$, por 
em BASIC, também é possível arrma- exemplo, com 25 linhas, ou seja, uma 


zenar dados literais em conjuntos ENDEREÇOS -lista dos endereços para cada registro e três colunas, 


desse tipo. correspondenles uma para cada campo). 
. Assim, por exemplo, os dados so- 
TELEFONES lista “dos telefones bre as pessoas seriam armazenados 
Essa possibilidade torna-se bastan- correspondentes nos elementos da matriz: 


te útil quando desejamos programar 
listas que têm várias informações re- 
lacionadas, como no exemplo da se- 
ção anterior (caderneta de endere- 
ços). 


Como você verá, a programação 
se torna mais fácil, compacta e gené- 
rica se usarmos uma única matriz de 
dados para representar os diferentes 
campos de informação do nosso ca- 
dastro. 


Como você se lembra, a caderneta 
tinha os seguintes conjuntos para ar- 
mazenamento de dados literais: 
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Organizando os dados dessa for- 
ma, será ainda mais fácil programar 
as diversas funções de cadastramento 
de informações da nossa caderneta 
de endereços. 

Na programação, basta que 
dimensionemos a matriz: 


220 DIM DADOS$(50,3,25) 


Observe que dimensionamos a ca- 
derneta para um máximo de 50 pes- 
soas (registros), com três campos ca- 
da, de 25 registros. O terceiro núme- 
ro da declaração DIM serve para es- 
pecificar o comprimento de cada da- 
do literal nesta matriz, que, nesse ca- 
so, deve ser fixo para todos os cam- 
pos. 


Portanto, a quantidade de memória 
a ser ocupada por esses conjuntos se- 
rá de: 


50x 25 +50x25+50x 25 = 
3750 caracteres 


Para armazenar um número maior 
ou menor de endereços, basta alterar 
os valores nos comandos DIM. 


Podemos, em seguida, definir os 
nomes dos campos, utilizando outro 
conjunto, chamado CAMPOS$ 


36 DIM CAMPOS$(3) 

37 LET CAMPOS$(1) = “NOME” 

38 LET CAMPOS$(2) = 
“ENDERECO”" 

39 LET CAMPOS$(3) = 
“TELEFONE” 


Seguindo a programação do exem- 
plo anterior da caderneta, a partir da 
linha 300, colocamos o setor de entra- 
da de dados. Vamos definir a variável 
J para contar o número de campos em 
cada registro, e que será incrementa- 
da por uma alça FOR...NEXT: 


300 LET NUM = NUM +1 
310 IF NUM > 25 THEN GOTO 900 
320 CLS 


330 a "ENDERECO NO.”;NUM 


335 P pu, 
340 FOR. J=1TOS3 

350 PRINT CAMPOS$(]);":”: 

355 INPUT DADOSS$(NUM,)) 

365 NEXT] 

370 GOTO 40 


Compare com o programa ante- 
rior, para verificar como este ficou 
muito mais compacto. 


A seguir, programamos o segmen- 
to de modificação de dados. Inicial- 


mente mostramos no alto da tela co- 
mo estão os dados da pessoa solicita- 
da, e depois pedimos os dados novos. 
Aqui também usamos alças FOR... 
NEXT: 


400 CLS 

410 PRINT “ENTRE O NUMERO DO 
REGISTRO A SER 
MODIFICADO:” 

415 INPUTX 

420 IF X<1 THEN GOTO 415 

425 IF X>NUM THEN GOTO 415 

430 PRINT 

435 PRINT “ENDERECO NO.";X 

440 PRINT * 


445 FOR]J=1TO3 

450PRINT CAMPOS$();":"; 
DADOS$(X,)) 

455 NEXT] 

460 PRINT 

465 FOR]=1 TOS 

470 PRINT “NOVO ";CAMPOS$ 


RAIA 


475 INPUT DADOS$(X,)) 
480 NEXT] 


490 GOTO 40 


Finalmente, podemos programar o 
segmento de procura. 


50 CLS 
510 PRINT “DIGITE O NOME DA 
PESSOA 
520 INPUT xs 
530 PRINT X$ 
540 FOR I= 1 TO NUM 
550 IF X$< >NOMES(I) THEN 
TO 580 
555 FOR]=2TO3 
560 PRINT CAMPOS$(1,]) 
565 NEXT] 
570 PAUSE 600 
575 GOTO 40 
580 NEXTI 
590 DA CONHECO ESTE 


NO 
595 GOTO 510 
Temos agora o nosso programa 


completo, com os comentários nos lu- 
gares apropriados: 


ABR e e 


1 
15 REM* PROGRAMA AGENDA 1.0) + 
20 REM* PARA LOGICA SINCLAIR + 


25 REM * PROGRAMA R. SABBATINI 


+ 


30 cp 


32 
34 LETNUM=0 


35 DIM PÇ 


35 LET $(2) = “ENDERECO" 
E po MEN CRER 


0 Pi RÍNT AGENDA TK” 

60 PRINT“ CADERNETA DE ENDERECOS" 

70 PRINT 

80 PRINT“ COMANDOS: 

OO PRINT e a — 
100 PRINT" INCLUIR UM NOME” 

120 PRINT'2 MODIFICAR DADOS 

130 PRINTº3 D, 

150 PRINT '“4 FIM” 
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2 REM 
A REM **** SOLICITAR E TESTAR OPCAO **** 


o PRINT “DIGITE UM NUMERO: 


90 INPUTOPCAO 
209 IFOPCAO<1 THEN GOTO 190 
210 IFOPCAO >4 THEN GOTO 190 


212 REM 


214 REM**** DIMENSIONAR CONJUNTOS **** 


216 REM 
242 REM 


244 REM **** DESVIAR PARA OPCAO **** " 


246 REM 


250 IFOPCAO = | THEN GOTO 300 
270 IFOPCÃO = 2THEN GOTO 400 
280 IFOPCAO = 3 THEN GOTO 500 | 
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Digite este programa no computa- 
dor e teste-o com vários dados. 


O mais interessante do programa é 
que ele é bastante amplo, pois se qui- 
séssemos adicionar outros campos de 
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informação (por exemplo, cidade, 
CEP, data de aniversário etc.), basta- 
ria modificar o dimensionamento da 
linha 220, adicionar os nomes no con- 
junto CAMPOS$ e, em seguida, mo- 
dificar o valor final das alças FOR... 
NEXT, nas linhas 340, 445, 465 e 555. 


10.1. Defina: 


conjunto numérico: 


conjunto alfanumérico: 


10.3. Escreva um programa para realizar a seguinte tarefa: um clube de afi- 
cionados de microcomputadores deseja fazer uma lista de todos os seus sócios, 
na qual conste a idade de cada um e a marca do microcomputador que possui. 
O programa, depois de entrados os dados, informará: 


— o número de sócios que têm microcomputadores marca TK 85; 
— o número de sócios que têm microcomputadores marca Apple; 
— o número de sócios que têm outros tipos de microcomputador; 

— a idade média dos sócios do clube; 

— o nome do sócio mais novo do clube. 


Utilize conjuntos unidimensionais chamados NOMES, IDADE e COMPU- 
TADORES para registrar os dados acima. 


10.4. Seja a matriz abaixo: 


DIM DADOS(2,3) 
) 1 2 3 
E 
RR 
a AR | FER a Ties ] 
| ELA dra Eid ae ae ] 
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Preencha as caselas da matriz com os dados gerados sucessivamente pelos 
programas abaixo: 


a. 


10 LET I=0 

20 LET ]J=2 

30 FOR M=I TO] 

40 LET DADOS(M,M) =1 
NEXT M 


50 
60 LET DADOS(2,3)=1 


70 FOR I=0 TO 2 

80 FOR J=0 TO 2 

90 IF I=] THEN GOTO 110 
100 LET DADOS(I,]) = 0 
110 NEXT J 

120 NEXT I 


130 LET SOMA = 0 

140 FOR COL=0 TO 3 

150 LET SOMA = SOMA + DADOS(0,COL) 
160 NEXT COL 

170 PRINT SOMA 


Que valor será mostrado na tela quando o computador executar a linha 170? 


10.5. Escreva por extenso a capacidade, em número de linhas, de colunas e 
de caracteres, dos seguintes conjuntos literais: 


a. DIM LIVROS$(100,50) 
b. DIM X$(12,25,5) 


c. DIM ARR$(1,100) 


fem, 


Cc AP 


ESENHANDO 
com O 


5 COMPUTADOR 


Você já viu, no capítulo 5 (páginas 
23 a 25), que existem alguns caracte- 
res gráficos que podem ser usados 
dentro de comandos PRINT para fa- 
zer desenhos na tela. 


Assim, por exemplo, podemos de- 
senhar um belo padrão de blocos 
gráficos na tela utilizando o seguinte 
programa: 


IOLET P$="BDO% PR" 
20 PRINT P$; 
30 GOTO 20 


Observe que a linha de caracteres 
gráficos armazenados em P$ é forma- 
da pelos seguintes caracteres gráfi- 


EO 


Você já aprendeu como são digita- 
dos estes caracteres gráficos no pro- 
grama, utilizando a tecla GRA- 
PHICS. 


Quando você executar este pro- 
graminha simples, com o comando 
RUN, aparecerá um padrão gráfico 
repetido, que encherá toda a tela, de 
cima para baixo. 


Para fazer experiências com dife- 
rentes linhas de conjuntos gráficos, 
modifique o programa para aceitar os 
caracteres introduzidos pelo coman- 
do INPUT, assim: 


IOINPUT P$ 
20 PRINT P$; 
30 GOTO 20 


Quando o programa é executado 
pela primeira vez, aparece na tela o 
sinal de prontidão, que avisa ao 
usuário que ele deve digitar uma li- 
nha de literais (caracteres): 


Nesse ponto, você deve pressionar 
as teclas SHIFT e 9, simultaneamen- 
te, para entrar no modo gráfico, e em 
seguida digitar de cinco a nove ca- 
racteres gráficos quaisquer. 


Para dar segúência ao programa, 
saia do modo gráfico, pressionando 
novamente as teclas SHIFT e 9, e de- 
pois a tecla NEW LINE. O mesmo 
efeito pode ser conseguido se você 
add duas vezes a tecla NEW 


Usando a sua imaginação, você 
poderá “inventar” muitos gráficos di- 
ferentes, fazendo uso de várias ins- 
truções PRINT. 


Por exemplo, vamos fazer um pro- 
grama para desenhar a cara do ET (o 
simpático personagem extraterrestre 
do filme do mesmo nome): 


IO PRINT 
20 PRINT“ 
30 PRINT “ 
40PRINT“ 
50 PRINT "| 
60 PRINT " É 


Para fazermos o ET “espichar” o 
pescoço, podemos colocar os seguin- 
tes comandos, dentro de uma alça 
FOR: 


70FORI=1 TO 10 
80PRINT “ E" 
90NEXTI 


Veja o efeito interessante causado 
por este programa. 


Uma das coisas mais fascinantes 
que podemos fazer com um computa- 
dor pessoal é um videogame com de- 
senhos que se movem (por exemplo, 
um avião que atravessa a tela de um 
lado para o outro). Esse tipo de técni- 
ca de programação é chamado de 
animação gráfica, pois ela corres- 
ponde à maneira como são produzi- 
dos em filmes os desenhos animados. 


Para aprender a realizar uma ani- 
mação gráfica no computador, pri- 
meiro temos que conhecer mais algu- 
mas características de programação 
da tela de vídeo. 


A tela de-vídeo de computadores 
do tipo TK 82, TK 83, TK 85 etc. pode 
ser comparada a uma folha de papel 
quadriculado, onde cada quadradi- 
nho corresponderia a uma posição 

determinada na tela: 
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Cada posição na tela corresponde 
a um caractere. 


Quando a tela é apagada por um 
comando CLS, ou logo após termos 
digitado o comando RUN, todas essas 
posições estarão em branco. 


Ao encontrar um comando PRINT, 
as posições na tela serão ocupadas 


pelos caracteres enviados por esse 
comando. 


Por exemplo, o programa: 


IQCLS 

20 PRINT 

30 PRINT “ALO” 

40 PRINT TAB (5);"COMO VAI?” 
50 STOP 


vai escrever nas seguintes posições da tela: 


Observe que cada comando PRINT 
faz o processo de escrita deslocar-se 
para a linha seguinte. A função TAB 
serve, no exemplo, para avançar dez 
posições, na segunda linha de im- 
pressão. 


Podemos comparar o esquema de 
posições na tela a uma matriz ou ta- 
bela bidimensional, que você já 
aprendeu no capítulo anterior, 


As linhas da tabela correspondem 
às linhas sucessivas na tela. Elas são 
numeradas de (0 a 21, de cima para 
baixo, começando pela linha supe- 
rior da tela. 


As colunas da tabela correspon- 
dem às colunas de impressão em uma 
determinada linha. Elas são numera- 
das de Ga 31, da esquerda para a di- 
reita. 


0123456 78 910111213141516171819 2021222324 2526 2728 2930 31 


[U) 
1 
2 
3 
4 
5 
6 
4 
8 
q 


Na realidade, a tela de vídeo do seu 
computador tem 23 linhas. Mas as li- 
nhas 22 e 23 normalmente não podem 
ser usadas por um comando PRINT. 
Elas estão reservadas pelo interpreta- 


dor BASIC para as seguintes fun- 


ções: 


linha 22: linha de entrada de dados 
(onde aparece o cursor 

»[[]" cada vez que um co- 
mando INPUT é encontra- 
do no programa; 

linha 23: é usada para mostrar men- 
sagens de erro (por exem- 
plo, 6/160). 


Da mesma forma que em uma ma- 
triz, podemos referenciar cada posi- 
ção da tela de vídeo, por meio dos 
seus índices, ou seja: 


posição da linha 
posição da coluna 


O comando que faz esta referência 
é chamado de AT, e é sempre usado 
conjuntamente com o comando 
PRINT. 


Por exemplo: 


PRINT AT 5,10; “ALO” — escreverá 
a palavra ALO na linha nº 5, 
contando de cima para baixo, e co- 
meçando na coluna 10 desta linha, 
contando da esquerda para a direi- 
ta; 


PRINT AT 20,0; “im” — colocará 
na linha 20, e na coluna (), o carac- 
tere gráfico im. 


AT, em inglês, significa EM. 


Portanto, PRINT AT 2,5 tem o se- 
guinte significado: 


ESCREVA EM 2,5 


O primeiro valor que vem depois 
da palavra AT é o número da linha. 
O segundo valor (que é separado do 
primeiro por uma vírgula) é o núme- 
ro da coluna. 


Esses números não podem ser me- 
nores do que zero nem maiores do 
que o número máximo de linhas ou 
colunas na tela, conforme o caso. 


Por exemplo, 


PRINT AT -2,20 
PRINT AT 2,56 


estão errados, pois, no primeiro 
exemplo, -2 é um número de linha 
que não existe e, no segundo, 56 é 
um número de coluna que também 
não existe. 


Portanto, o comando PRINT AT é 
muito útil, pois permite que escreva- 
mos qualquer coisa (caracteres nor- 
mais ou gráficos), em qualquer ponto 
da tela, como um desenho em uma 
folha de papel. 


Por exemplo, o programa: 
10 PRINT AT 11,14;“MEIO” 


escreverá no meio da tela, aproxima- 
damente, a palavra MEIO: 


Dessa forma, o programa não pre- 
cisa ter várias linhas PRINT, coloca- 
das em uma certa ordem. 


Você vai entender melhor esse 
processo, ao estudar o programa 
abaixo. 


O seu objetivo é escrever os nomes 
dos quatro pontos cardeais (“rosa dos 


ventos” ou bússola), nas quatro bor- 
das da tela, assim: 


ps 


| 


OESTE 


A primeira coisa que você deve fa- 
zer é calcular as posições de linha e 
coluna de cada palavra. 


Uma forma de fazer este cálculo é 
escrever as palavras em um papel 
quadriculado comum, marcado com 
os limites da tela. 


No exemplo acima, teremos: 


palavra nº de linha nº de coluna 


NORTE (1) 13 
OESTE q (1) 
LESTE q 22 
SUL 21 l4 


Escolhemos a coluna 13 para a pa- 
lavra NORTE porque a coluna do 
meio é de número 15, e a palavra tem 
5 letras. Assim, ela ficará aproxima- 
damente centralizada na linha nº 0, 
Da mesma forma, escolhemos a colu- 
na 14 para a palavra SUL. 


As palavras OESTE e LESTE serão 
colocadas na linha do meio. Escolhe- 
mos 27 para o nº de coluna da pala- 
vra LESTE porque assim ela ocupará 
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até a coluna nº 31, ficando encostada 
na bordá direita da tela. 


Agora que o trabalho de cálculo 
está feito, escrever o programa é ele- 
mentar: 


IBCLS 

20 PRINT AT 0,13;"NORTE” 
30 PRINT AT 11,0;"OESTE” 
40 PRINT AT 11,27;“LESTE” 
SO PRINT AT 21,14;“"SUL” 


Note que não faria diferença, para 
o resultado final, se tivéssemos escri- 
to o programa assim: 


IOCLS 

20 PRINT AT 0,13;“NORTE” 
30 PRINT AT 11,27;“LESTE” 
40 PRINT AT 11,0;“OESTE” 

50 PRINT AT 21,14;“SUL” 


A única coisa que iria mudar seria 
a ordem em que o computador escre- 
veria as palavras. 


O comando PRINT AT tem outra apli- 
cação muito interessante, para dotar 
seus programas de um aspecto mais 
“profissional”. 


Ao solicitarmos alguma entrada ao 
operador de um programa, seria 
ideal que a mensagem aparecesse lo- 
go acima da linha de digitação (linha 
nº 22): 


Depois de digitar o nome, quere- 
mos outra mensagem assim: 


Para fazer isso, nada mais fácil: 


10 PRINT AT 21,0;“QUAL E O SEU 
ME 2” 


NOME ? 
20 INPUT NOMES 
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30 PRINT AT 21,0;"QUAL E A SUA 
IDADE ?" 


40 INPUT IDADE 


Note que a segunda mensagem (li- 
nha 30) é mais longa que a primeira 
(linha 10). Por isso, ao ser colocada a 
segunda mensagem na tela, ela enco- 
brirá a mensagem anterior, lá coloca- 
da. 


Entretanto, se ocorresse o contrá- 
rio, isto é, se a segunda mensagem 
fosse mais curta que a primeira, as 
duas se “misturariam” (um pedaço da 
primeira continuaria na tela). Por 
exemplo, o programa 


10 PRINT AT 21,0;“QUAL E O SEU 
NOME ?” 


20 INPUT NOMES 

30 PRINT AT 21,0;“E A SUA 
IDADE ?” 

40 INPUT IDADE 


originaria a seguinte mensagem, 
quando executada a linha 30; 


Para evitar isso, temos antes que 
“limpar” a linha assim: 


25 PRINT AT 21,0,” 


o que é mais rápido do que dar um 
comando CLS (que iria limpar toda a 
tela, inclusive a linha 21). 


Ou, então, colocar alguns espaços 
em branco após a segunda mensa- 
gem, de modo a superpô-los ao espa- 
ço ocupado pelo restante da mensa- 
gem anterior: 


10 PRINT AT 21,0;*QUAL E O SEU 
NOME ?” 


20 INPUT NOME$ 

30 PRINT AT 21,0;“E A SUA 
IDADE? * 

40 INPUT IDADE 


Vamos usar agora o comando 
PRINT AT para fazer uma animação 
gráfica. 


Movimentaremos um aviãozinho 
na tela, fazendo-o voar da esquerda 
para a direita. 


A imagem do avião será obtida por 
meio de uma linha assim: 


PRINT * ada li 


Vamos escolher uma linha da tela, 
por onde voará o avião. Por exemplo, 
a linha 10. 


Para colocar o avião em posições 
sucessivas na tela, vamos utilizar uma 
alça FOR...NEXT, assim: 


IOFOR]=0TO 26 
20PRINTATIO);* nlhm 
30 PRINT AT 10,];“ 
40NEXT] 


A linha 20 serve para desenhar a 
imagem do avião, começando na li- 
nha 10, coluna J. 


Assim, como J fica igual a 0, 1, 2, 
3... etc., a cada repetição da alça 
FOR, que vai de 10 a 40, a imagem 
do avião será escrita nas posições (), 
1,2,3... etc. da linha 10, dando a 
impressão de locomoção. 


A linha 30 serve para apagar o 
avião da posição J, antes de colocá-lo 
em nova posição. Por isso, são escri- 
tos cinco caracteres em branco, so- 
bre a mesma posição anterior. Expe- 
rimente não colocar esta linha e veja 
o que acontece. 


O limite máximo da alça J (ou seja, 
26) foi definido assim, pois o avião 
tem cinco caracteres. 


Ão executar o programa, você po- 
de observar que a imagem do avião- 
zinho dá a impressão de se movimen- 
tar com rapidez de um lado para ou- 
tro da tela. 


O programa, do jeito que está, já 
dá o máximo de velocidade aparente 
ao avião, se quisermos deslocá-lo 
uma posição de cada vez. 


Para aumentar a velocidade de 
animação na tela, portanto, basta in- 
crementarmos a posição do avião de 
2em2 ou de 3 em 3, assim: 


I0FOR]=0TO 26 STEP 2 
20PRINT ATIOJ;* Malha 
30 PRINT AT 10,];“ te 
40NEXT] 


Não podemos usar um número 
muito grande no STEP, entretanto, 
pois o avião “pulará” muito na tela, e 
perderemos o efeito contínuo de ani- 
mação. 


Para diminuir a velocidade do 
avião a operação é mais fácil: basta 
colocarmos uma alça FOR de retardo 
de tempo, entre as linhas 20 e 30 e as 
linhas 30 e 40: 


IDFOR]=0TO 26 


20PRINT ATIOJ;" Malha 
25FORN=1 TOS 

27NEXTN 

30 PRINT AT 10,];“ a 
35FORN=1 TOS 

37 NEXT N 

40NEXT] 


Se quisermos fazer um programa 
mais abrangente, que nos permita 
entrar dados de velocidade e linha de 
deslocamento do avião, teremos: 


1 CLS 
2 PRINT “O VOO DO AVIAO” 
4 PRINT AT 21,0;“ALTURA 
(DA 20) :” 
6 INPUT ALT 
7 PRINT AT 21,0;ºVELOCIDADE 
(DA 20) :” 
8 INPUT VEL 
9CLS 
10 FOR]=0TO 26 
20 PRINT AT21-ALT,);* Hmalham ' 
25 FORN=1 TO 20- VEL 
27 NEXTN 
30 PRINT AT 21-ALT,J;“ E 
35 FORN=1 TO 20- VEL 
37 NEXT N 
40 NEXT] 
50 GOTO 1 


Note que velocidade e altura são 
respectivamente o inverso de retardo 
e posição da linha na tela. Por isso, 
subtrafmos os valores entrados de 
seus valores máximos, para poder- 
mos inverter! 


EX EREMAnS 


1. Faça um programa de animação grá- 
fica para fazer um foguetinho desenha- 
dona parte de baixo da tela subir em tra- 
jetória vertical até o topo da mesma. 


Dica: é semelhante ao programa do 
avião, apresentado anteriormente, só 
que o deslocamento é ao longo de uma 
coluna da tela (o número da linha na de- 
claração AT é que muda, diminuindo à 
medida que o foguete sobe). 


2. O que faz o seguinte programa na 
tela? 


10 RAND 
20 LET X=INT(RND*30)+1 


ais gráficos 


O sistema de localização de caracte- 
resnatela de vídeo, usando o comando 


Um ponto qualquer no meio desta 
“grade” ou quadriculado é localizado 
através de suas coordenadis, ou seja, os 
números correspondentes à linha (coor- 
denada vertical) e à coluna (coordena- 
da horizontal) onde está, Para cada par 
de números desse tipo, temos apenas um 
ponto correspondente na tela. O contrá- 
rio também é verdadeiro: para cada 
pontonatela, temos apenas um determi- 
nado par de coordenadas, e apenas um. 


30 LET Y=INT(RND*20)+1 
40 PRINT AT Y,X;*” 
50 GOTO 20 


Coloque o programa acima em seu 
computador e veja o resultado! 


3. Modifique o programa acima para 
colocar um máximo de 100 asteriscosna 
tela. 


4. Faça um programa para desenhar 
uma torneira na parte superior da tela, 
eque de pingando gotinhas de água 
continuamente (animação gráfica da 
gota caindo). 


PRINT AT, como você percebeu muito 
bem, corresponde a uma espécie dema- 
pa ou gráfico com posições horizontais 
e verticais. 


Esse sistema de referência é chamado 
de sistema de coordenadas ortogonais, 
pois os dois “eixos” de referência (o ver- 
tical e o horizontal) são perpendicula- 
res, ou ortogonais entre si: 


O ponto na tela (um ponto nesse sis- 
tema de coordenadas no computador) 
recebe o nome de pixel. Este termo vem 
do inglês, e significa picture element 
(elemento gráfico). As coordenadas, 
por sua vez, recebem os nomes de orde- 
nada (na vertical) e abscissa (na ho- 
rizontal). 


Já se convencionou chamar de X a 
abscissa e de Y a ordenada de um ponto: 
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1) 
! 
2 
3 
4 
5 
6 
4 


Co Rib toRsa DRESS DER abr A ES E 
abscissas 


Para quem já conhece o sistema de 
coordenadas ortogonais (também cha- 
mada de cartesianas, em homenagem 
ao seu inventor, o matemático e filósofo 
francês René Descartes), pode parecer 


SNORT ONDO 


Acontece que, por razões de facilida- 
de de programação do controle da tela 
gráfica, como veremos, os idealizadores 
desse tipo de microcomputador preferi- 
ram um arranjo inverso, que às vezes nos 
atrapalha, mas não chega a prejudicar. 


12 "1314/16 


(colunas) 


estranho que zero do eixo vertical (or- 
denadas) seja colocado na parte de ci- 
ma da tela. Normalmente, nos livros de 
matemática ou de geometria, isto apare- 
ce assim: 


7 89 10 1 12/13 14 15 
ir ui ; 


No sistema que vimos até agora (co- 
mando PRINT AT), podemos colocar 
um caractere qualquer (gráfico ou não 
gráfico), em qualquer ponto da tela. 


PRINT AT 10,12;" E” 


ne / caractere 


ordenada abscissa 


Esse sistema nos permite colocar fa- 
cilmente um texto ou um desenho em 
qualquer ponto da tela. 


Entretanto, ele tem uma desvanta- 
gem: se quisermos fazer um gráfico mais 
detalhado, de modo a colocar na tela 
pontinhos menores, não dá. 


Examinando os caracteres gráficos 
existentes no seu computador da linha 
Sinclair, você verá que eles são forma- 
dos pela combinação de quatro subdi- 
visões de um quadradinho gráfico: 


2EM 


Assim, qualquer caractere gráfico 
(excetuando-se os que têm elementos de 
cor cinza) pode ser composto 
preenchendo-se quadradinhos meno- 
res, em qualquer combinação: 


Portanto, podemos concluir que exis- 
te um pixel menor do queo caractere, e 
que corresponde a um tamanho quatro 
vezes menor, em área, do que o pixel 
que podemos manipular usando o co- 
mando PRINT AT. 


A linguagem BASIC dos computado- 
res da linha Sinclair tem comandos pa- 
ra manipular diretamente estes pixels 
menores. Com eles fica muito mais fácil 
traçar desenhos mais detalhados. 


Esses comandos são: 


PLOT - para colocar um pontinho na 
tela 


UNPLOT - para apagar um pontinho 
datela 


O sistema de coordenadas dos co- 
mandos PLOT e UNPLOT consiste em 
42 linhas, ou pontos no eixo vertical 
(ordenadas), e 64 colunas, ou pontos no 
eixo horizontal (abscissas): 


Note que, nesse novo sistema de coor- 
denadas, a posição do eixo vertical é 
mais “correta”, ou seja, semelhante à 
convenção adotada pelo sistema 
cartesiano. 


E muito fácil usar os comandos PLOT 
eUNPLOT. Basta fornecer apenas dois 
valores separados por uma vírgula, os 
quais indicam a ordenada e a abscissa 
do ponto desejado na tela: 


1. constantes numéricas 

2. variáveis numéricas 

3. expressões matemáticas 

É claro que podemos misturar no 


mesmo PLOT qualquer um dos tipos 
acima: 


PLOT 0,3 --» traça um ponto na 
abscissa = () e ordenada=3 


UNPLOT 5,2 --» apaga um ponto na 
abscissa=5 e ordenada=2 


Os argumentos (valores Xe Y) forne- 
cidos aos comandos PLOT e UNPLOT 


podem ser de três tipos: 
Exemplo: PLOT3,2 
Exemplos: PLOTX,ABC 
PLOT ILX(2) 
Exemplos: PLOTA+1,B*24+C 
PLOT X/2,SOR(X) 
PLOT 2,BC'X 
PLOT 12+CK 
etc. 


43 
O see 
pontinhos 


Colocar e apagar pontos (pixels) na 
tela gráfica é bem fácil com a ajuda dos 
comandos PLOT e UNPLOT. 


Experimente digitar, em modo direto 
(isto é, sem número de linha), o seguin- 
te comando: 


PLOT 31,21 


Veja o que aconteceu na tela: 


Apareceu um pixel bem no meio da 
tela de vídeo, ou seja, comas coordena- 
dasX=31eY=21. 


Agora experimente apagar este pon- 
to com o comando: 


UNPLOT 31,21 


Veja como o pontinho se apagou! 


Uma brincadeira interessante é repe- 
tir aqui aquele programa proposto nos 
exercícios da última lição, que serve pa- 
ra colocar pixels ao acaso na tela: 


10 RANDOM 

20 LET X=INT(RND*64) 
30 LET Y=INT(RND*44) 
40 PLOT XY 

50 GOTO 20 


Note que o número aleatório sorteado 
para a coordenada X varia entre 0) e 63 
(a função RND nunca atinge 1.0000),e 
entre À) e 43 para a coordenada Y. O 
efeito final se assemelha à chuva mo- 
lhando uma calçada! 


Outro programa interessante serve 
para desenharmos qualquer coisa na te- 
la, fornecendo ao programa as coorde- 
nadas dos pontos que quisermos dese- 
nhar, um à um, na tela: 


10 REM DESENHOS NA TELA 

20 PRINT AT 21,0;“ENTRE VALOR 
DEX: 

30 INPUT X 

40 PRINT AT 21,0;“ENTRE VALOR 
DE Y 


Em 
[] 
+ E azendo retas 


Retas paralelas aos eixos verticaleho- 
rizontal (ou seja, às bordas da tela) po- 
dem ser traçadas com grande facilida- 
de. Basta dar vários comandos PLOT 
com coordenadas próximas umas às ou- 
tras: seos pontinhos “grudarem” unsnos 
outros, darão a impressão visual de uma 
reta. 

Por exemplo, digite sucessivamente 
os comandos diretos: 


PLOT 31,21 
PLOT 32,21 
PLOT 33,21 


E veja o resultado final: 


Para não ficar repetindo muitas vezes 
os comandos PLOT, podemos usar os 
comandos FOR...NEXT para traçar uma 
reta: 


10 FOR X=31 TO 33 
20 PLOT X,21 
30 NEXT X 


Veja que o resultado final deste pro- 
grama (após digitarmos o comando 
RUN) é idêntico ao mostrado acima com 
os comandos PLOT sucessivos. Isso 
acontece porque a variável X assume os 
valores 31, 32e 33, controlados pela al- 
ça FOR, eovalor 21 da vertical é manti- 
do constante. 


Veja este programa para traçar uma 
reta na horizontal, começando em um 
determinado ponto e indo até outro: 


10 REM RETAS HORIZONTAIS 
REM 


20 PRINT AT 21,0/"ENTRE VALOR 
INICIAL DE X :” 

30 INPUTXI . 

40 PRINT AT 21,0;“ENTRE VALOR 
FINAL DE X:” 

50 INPUT XF 

60 PRINT AT 21,0;“EM QUE 
POSICAO HORIZONTAL:” 
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70 INPUTY 

80 FORX=XITOXF 
99 PLOTXY 

100 NEXT X 

110 GOTO 20 


Para entender melhor o esquema de 
coordenadas gráficas com os comandos 


— 


. canto inferior esquerdo 
2. canto inferior direito 

3. canto superior esquerdo 
4 


. canto superior direito 


Portanto, para traçar quatro linhas de 
um canto a outro, fazemos: 


10 REM MOLDURA PARA O TK 
20 FORI=0 TO 63 

30 PLOT LO 

40 PLOT 1,43 

50 NEXTI 

60 FOR]=0 TO 43 

70 PLOT 0J 

80 PLOT 63] 

90 NEXTI 


A primeira alça FOR...NEXT, que vai 
das linhas 20 até 50, traça simultanea- 
mente as retas na parte de baixo (orde- 
nada (0), e de cima (ordenada 43), res- 
pectivamente. A reta aparece na tela 
porque a variável |assume os valores (), 
1,2,3, 4... etc., até 63, “grudando” os 
pontinhos colocados na tela por cada 
instrução PLOT. 


A segundaalça FOR...NEXT, que vai 
das linhas 60 até 90, faz a mesma coisa 
com as duas linhas verticais, situadas 
nas abscissas () e 63, respectivamente. 


O uso da alça nos dá recursos bem 
poderosos para traçar retas de vários ti- 
pos. Por exemplo, para traçar uma reta 
pontilhada, assim: 


basta “acender” um ponto sim, um ponto 
não, na tela, com a ajuda da instrução 


10 FOR I=0 TO 63 STEP 2 
20 PLOT 1,21 
30 NEXTI 


Percebeu? 


PLOT e UNPLOT, vamos fazer um pro- 
grama bemsimples, queserve para tra- 
gar uma moldura ao redor da tela gráfi- 
ca (ou seja, quatro traços finos coloca- 
dos nos limites da tela gráfica). 


Os quatro cantos da tela gráfica têm 
as seguintes coordenadas: 


43 
43 
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EXERIERA NS 


1. Modifique o programa que traça re- 
tas na horizontal, dados os pontos de iní- 
cioefim, demodo que seja possível tra- 
çar retas na vertical. 


pai Faça um programa para desenhar um 


retângulo qualquer na tela (apenas o 
seu contorno). O usuário deverá forne- 
cerascoordenadas Xe Y de cada canto 
da figura. 


3. Faça um programa para desenhar um 
retângulo qualquer na tela. O usuário 
deverá fornecer os seguintes dados: 
coordenadas X e Y do canto inferior es- 
querdo do retângulo, tamanho do lado 
horizontal e tamanho do lado vertical. 


4. Comoo programa acima poderia ser 
modificado para preencher completa- 
mente o interior do retângulo (ou seja, 
desenhar um retângulo sólido)? 


5. Faça um programa para traçar uma 
reta em diagonal, indo do canto inferior 
esquerdo ao canto superior direito da 
tela (atenção: este programa tem apenas 
três linhas!) 


6. Modifique o programa que desenha 
pontinhos ao acaso na tela, para pedirao 
usuário os limites inferior, superior, di- 
reito e esquerdo de um retângulo na te- 
la, dentro do qual serão jogadas os pon- 
tinhos (ou seja, elesnão ocuparão atela 
inteira, como no exemplo dado no 
texto). 


Podemos realizar animações gráficas 
com os comandos PLOT e UNPLOT, 
também. 


Veja este programa para simular uma 
bolinha caindo da parte de cima até a 


gar, permitindo ao usuaíio enxergar o 
ponto traçado antes de ele se apagar da 
tela. Se você modificar o valor 10 da li- 
nha 30, poderá alterar esta velocidade 
para mais ou para menos. 


parte de baixo da tela: Mas atenção: o uso do PLOT e UN- 

PLOT para animações gráficas só dá 

10 FORY=43 TOO STEP-—1 bons efeitos quando o desenho a sertra- 

7] 20 PLOT31Y çadofor bem pequeno (poucos pontos). 
30 FOR T=1 TO 10 Caso contrário, o desenho se fará muito 

KR |] ” 40 NEXT T lentamente, bem como a animação grá- 
E » pm ra Es a 31Y fica (movimento) de suas partes. Para 
T desenhos mais complexos é mais ade- 

Ema com quado usar o comando PRINT AT con- 
| A alça que vai da linha 30 a 40 causa juntamente com os caracteres gráficos 


um retardo de tempo, para fazer o pon- disponíveis no teclado, como vimos na 
tinho se deslocar para baixo mais deva- seção anterior. 


DW——————— 


RESPOSTAS AOS EXERCÍCIOS ANTERIORES 


Exercício 2, pág. 80. Modifique o pro- 
grama de cálculo dos pontos ganhos dos 


sultados a diferença entre o número de 
pontos ganhos por cada time e a média 
al 


times, de modo que mostre na tela de re- geral. 
Solução: 
IOPRINT “CAMPEONATO BRASILEIRO DE FUTEBOL” 
20PRINT" TABELA DE PONTOS GANHOS” 
25 PRINT“ VERSÃO 3” 
30PRINT 
40REM 
SOREM === ENTRADA DE DADOS 
51 REM 


52 PRINT “QUANTOS TIMES?” 
54 INPUT NT 


70 PRINT “ENTRE O NUMERO DE PONTOS GANHOS” 
75 PRINT “PARA CADA TIME DA TABELA: 
80PRINT 

85 FOR N=1 TONT 

90 PRINT “TIME NUMERO ";N:“ 7 "; 
100INPUT T(N) 

110PRINT T(N) 

I20NEXTN 

130 REM 

140REM === CALCULO DA MEDIA 
150REM 

160LET SOMA= 0 

165CLS 

IZ0FOR N=1 TONT 

I80LET SOMA=SOMA + T(N) 

I90NEXT N 

200REM 

210REM === MOSTRA RESULTADOS 
220 REM 

400 LET MEDIA = SOMA/NT 

410 PRINT 

420 PRINT “MEDIA DOS PONTOS GANHOS = "; MEDIA 
422 PRINT 


425 FOR N=1 TONT 

426 PRINT “TIME NUMERO ": N;” =“; T (N); “PONTOS GANHOS. o 
428 PRINT "DIFERENCA DA MEDIA = “: MEDIAT(N); " PONTOS” 
429 NEXTI 

430 STOP 
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Exercício 1, pág. 92. Modifique o pro- 
grama de emissão de nota de despesas 
de modo que tenha as seguintes funções 
adicionais: 


a. Entrar a data de emissão da nota eo 


nome do cliente para mostrar na tela 
de emissão; 


b. Armazenar o valor total de cada no- 
ta, cumulativamente em uma variável 
RENDA, e mostrar este valor se o no- 


me do cliente for “FIM”. 
Solução: 


IGCLS 

20 PRINT “EMISSÃO DE NOTA DE DESPESAS" 
30PRINT “CASA DE FRIOS “AZEITONA DOURADA" LTDA” 
32 PRINT 

34 PRINT “DIGITE A DATA DE HOJE:" 

36 INPUT DAT$ 

AGPRINT | 

50 DIM M$ (5,20) 

55 DIM TT (5) 

60LET M$(0) ="AZEITONAS PRETAS” 

7OLET M$(1)="AZEITONAS VERDES” 

8OLET M$(2)="PRESUNTO GORDO” 

9OLET M$(3)="PRESUNTO MAGRO” 

100LET M$(4)="MOZARELA” 

1OLET M$(5)="QUEIO PRATO" 

115 LET RENDA= 0 


120 REM 

a o ***** ENTRADA DOS DADOS DA COMPRA ***+* 
I40RE 

142 PRINT “DIGITE O NOME DO CLIENTE:” 

144 INPUT NO$ 

146 IF NO$="FIM" THEN GOTO 900 

148 PRINT 


150PRINT “DIGITE A QUANTIDADE COMPRADA E DEPOIS” 
160 PRINT “O PREÇO POR QUILOGRAMA PARA CADA MER- 
170PRINT “CADORIA APRESENTADA NA TELA. DIGITE 0” 
180 PRINT “SE O CLIENTE NAO COMPROU A MERCADORIA” 
190 PRINT 

200FORI=1 TOS 

210PRINT M$I);" ? ” 

220 INPUT Q(1) 

2301F Q(D)=() THEN GOTO 250 

240 INPUT PR(I) 

250NEXTI 

260 REM 

270 REM ***** IMPRESSÃO DA NOTA ***** 

280 REM 

290CLS 

300 PRINT * NOTA DE DESPESAS” 

305 PRINT 

307 PRINT “CLIENTE: “; NO$;" DATA:":DAT$ 

310PRINT 

320 PRINT "MERCADORIA"; TAB(17); “QUANT PRECO" 

325 LET TCT= 0 

330 FOR I=1 TO 5 

3401F Q(D)=OTHEN GOTO 360 ; 

350 PRINT M$(D; TAB(17); Q(1); TAB(22); O(I*PR(D) 

355 LET TOT=TOT+O(N)*PR(D 

360NEXTI 

365 PRINT “TOTAL: TAB(22); TOT 

366 LET RENDA= RENDA +TOTAL 

370 PAUSE 600 

380CLS 


390 GOTO 150 
800 REM 


8IOREM ***** MOSTRAR RENDA FINAL **+***+ 


820 REM 
900 CLS 


910PRINT "RESULTADO CUMULATIVO = CR$ '“:RENDA 


920 STOP 


Exercício 1, pág. 95. Modifique o pro- 
grama AGENDA para incluir as seguin- 
tes funções adicionais: 


1 - Exclusão de um nome da caderneta 
(dica: o programa solicita o número 
do registro a ser excluíidoe em segui- 


da coloca espaços em branco nos con- 
juntos correspondentes); 


2 - Listagem de todos os nomes colo- 
cadosna caderneta (dica: coloque um 
registro em cada linha da tela, come- 
çando com o número do registro, de- 
pois o nome, o endereçoe o telefone). 


Solução (programa da pág. 94 completo): 


IOREM *tttremeeem nana a mm 


15 REM * PROGRAMA AGENDA 1.00 * 
20 REM * PARA LOGICA SINCLAIR .* 
Es ao * PROGRAMA: R. SABBATINI * 
30 REM 


CRRRRLLRA A RARLRRRRRR RARA A 


32 REM 

33 REM 

34 REM ***** DIMENSIONAR CONJUNTOS ***** 
35 REM 

36 DIM NOMES$(5025) 

37 DIM ENDERECOS(5025) 

38 DIM TELEFONES$(5010) 

4QCLS 

SO PRINT" AGENDA TK” 

6OPRINT" CADERNETA DE ENDERECOS” 
ZOPRINT 

80PRINT “ COMANDOS: 

MPRINTNS === acc 


100PRINT INCLUIR UM NOME” 
I20PRINT'2 | MODIFICAR DADOS” 
I30PRINT'3 | INFORMAR DADOS” 
ISOPRINT'“4 FIM” 


IZ0PRINT 

172 REM 

174 REM ***** SOLICITAR E TESTAR OPCAO ***** 
176 REM 

180 PRINT “DIGITE UM NUMERO: 

199 INPUT OPCAO 

2001F OPCAO <1 THEN GOTO 190 

2101F OPCAO >6 THEN GOTO 190 

242 REM 

244 REM ***** DESVIAR PARA OPCAO *+**+* 
246 REM 

2501F OPCAO =1 THEN GOTO 300 

2701F OPCAO =2 THEN GOTO 490 

2801F OPCAO =3 THEN GOTO 500 

284 IF OPCAO =4 THEN GOTO 600 

286 IF OPCAO =5 THEN GOTO 700 


mm 
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pio OPCAO =6 THEN STOP 
294 REM ***** ADICIONAR NOMES ***** 
REM 


296 

300LET NUM=NUM+1 

Ed NUM>25 THEN GOTO 900 
q 

330 PRINT "ENDERECO NO*'; NUM 


340 PRINT "NOME:” 

345 INPUT NOMES(NUM) 

350 PRINT “ENDERECO:” 

355 INPUT ENDERECOS(NUM) 

360 PRINT “TELEFONE: 

365 INPUT TELEFONES(NUM) 

370 GOTO 40 

380 REM 

382 REM ***** MODIFICAR DADOS ***** 
384 REM 


400CLS 

410 PRINT "ENTRE O NUMERO DO REGISTRO A SER MODIFICADO:" 
415 INPUTX 

420IF X<1 THENGOTO 415 

425 IF X>25 THEN GOTO 415 


430 PRINT 

435 PRINT “ENDERECO NO!':X 
A4MQPRINT'============ ===" 
445 PRINT “NOME: “:NOMES(X) 

450 PRINT “ENDERECO: “:ENDERECOS(X) 
455 PRINT “TELEFONE; “TELEFONES(X) 
460 PRINT "NOVO NOME:" 

465 INPUT NOMES) 

470 PRINT “NOVO ENDERECO:” 

475 INPUT ENDERECOS(%) 

480 PRINT "NOVO TELEFONE: 

485 INPUT TELEFONES(X) 

490 a 

492 R 

494 REM Rs" PROCURA DADOS "tre 
496 REM 

SÓDCLS 

510 PRINT = (O) nos DA PESSOA:"; 


540 FOR 1=1 TO NUM 

550 IF X$< > NOMES(I) THEN GOTO 580 
560 PRINT “ENDERECO:":;ENDERECOS(T) 
565 PRINT “TELEFONE:“TELEFONES(I) 
570 PAUSE 600 

575 GOTO 40 

S80NEXTI 

590 PRINT "NÃO CONHECO ESTE NOME” 
595 GOTO 510 

600 REM 

G1OREM ***** LISTA DADOS ***** 

620 REM 

630CLS 

640 FOR I=1 TON 

650 PRINT NOMES)? *" ENDERECOS(D);” "iTELEFONES() 
660NEXTI 

670 PAUSE 600 

680GOTO 40 

700REM 

TIQREM ***** MODIFICAR DADOS ***** 
720REM 


T30CLS 
740 PRINT “ENTRE O NUMERO DO REGISTRO A SER SUPRIMIDO:" 


750 INPUT X 

7601F X<1 THEN GOTO 415 
T70IF X>25 THEN GOTO 415 
780LET NOMES(X) =" " 

790 LET ENDERECOS(X)=" " 
800 LET TELEFONES(X) =" " 
MB GOTO 40 


Exercício 1, pág. 104. Faça um programa 
de animação gráfica para fazer um fo- 
guetinho desenhado na parte de baixo 
datela subir em trajetória vertical até o 
topo da mesma. 


Solução: 


I0FOR L=22 TO 1 STEP 1 
20PRINT AT L/15;“ Pla” 
30 FOR J=1 TO 20 
40NEXT] 

DOPRINT ATLAS" 
6ONEXTL 


Exercício 3, pág. 104. Modifique o pro- 
grama do Exercício 2 da página 104 pa- 
ra colocar um máximo de 100 asteriscos 
natela. 


Solução: 


IGRANDOM 

ISFORI=1 TO 100 

20LET X=INT(RND*30) +1 
30LET Y=INT(RND*20)+1 
40 PRINT AT Y,X;"” 
SONEXTI 


Exercício 4, pág. 104. Faça um programa 
para desenhar uma torneira na parte su- 
perior datela, e que fique pingando go- 
tinhas de água continuamente (anima- 
ção gráfica da gota caindo). 


Solução: 


1OPRINT AT 1, 10;” 

20 PRINT AT 2, 10; 

30 FOR 1=3 TO 20 
40PRINT ATI 10" EM " 
50 FOR ]=1 TO 20 
6ONEXT] 

ZOPRINT ATI,10;” N 
S0NEXTI 


9PGOTO 30 


Exercício 1, pág. 107. Modifique o pro- 
grama quetraça retas na horizontal, da- 
dos os pontos de início e fim, de modo 
que seja possível traçar retasna vertical. 


Solução: 


10REM RETAS VERTICAIS 

I5REM 

20PRINT AT 21,0;"ENTRE 
VALOR INICIAL DEY :” 

30INPUT YI 


: 40 PRINT AT 21,0;"ENTRE 

VALOR 
FINALDEY :” 

50 INPUT YF 

60 PRINT AT 21,0;"EM QUE 
POSICÃO VERTICAL :” 

70 INPUTX 

80 FORY=YITOYF 
PLOT XY 


90 1 
100NEXTY 
110GOTO 20 


Exercício 2, pág. 107. Faça um programa 
para desenhar um retângulo qualquer 
natela (apenaso seu contorno). Ousuá- 
rio deverá fornecer as coordenadas X e 
Y de cada canto da figura. 


Solução: 
10REMRETANGULO PARA O 
TK 


20PRINT “ENTRE 2 POSI- 
COESPARA LADOS HORI- 
ZONTAIS:” 

30INPUT Y1 

4DINPUT Y2 

SOPRINT “ENTRE 2 POSI- 
COES PARA LADOS VER- 
TICAIS:” 

60INPUT X1 

TO INPUT X2 

80CLS 

90 FOR X=X1 TO X2 

IG0PLOT XY1 

LG PLOT XY2 

120 NEXT X 

130 FOR Y=Y1 TO Y2 

140 PLOT X1Y 

150 PLOT X2Y 

160 NEXT Y 


Exercício 3, pág. 107. Faça um programa 
para desenhar um retângulo qualquer 
natela. Ousuário deverá fornecer os se- 
guintes dados: coordenadas X e Y do 
canto inferior esquerdo do retângulo, ta- 
manho do lado horizontal etamanho do 
lado vertical. 


Solução: 
10REM RETANGULOPARA O 


TK 

12PRINT “COORDENADA X 
DA ORIGEM: 

14INPUT XI 

16PRINT “COORDENADA Y. 
DA ORIGEM: 

18INPUT Y1 

20PRINT “TAMANHO DOS 
LADOS HORIZONTAIS:” 

30 INPUT H 

SOPRINT “TAMANHO DOS 
LADOS VERTICAIS: 

6OINPUT V 


80CLS 
90 FOR X=X1 TO X1+H 


100 PLOT XY1 

110 PLOT XY1+V 

120 NEXT X 

130 FOR Y=Y1 TOY1I+V 
140 PLOT XIY 
IS0PLOT XI+HY 

160 NEXT Y 


Exercício 4, pág. 107. Comoo programa 
acima poderia ser modificado para 
preencher completamenteo interior do 
retângulo (ou seja, desenhar um retân- 
gulo sólido)? 


. Solução: 
10 e RETANGULOPARA O 


12PRINT "COORDENADA X 
DA ORIGEM: 

14INPUT XI 

16PRINT “COORDENADA Y 
DA ORIGEM: 

18INPUTYI1 

20PRINT “TAMANHO DOS 
LADOS HORIZONTAIS:” 

30 INPUT H 

SOPRINT “TAMANHO DOS 
LADOS VERTICAIS: 

6OINPUT V 


80CLS 

90 FOR X=X1 TOXI+H 
130 FOR Y=Y1 TO Y1+V 
140 PLOT XY 

160NEXT Y 

170NEXTX 


Exercício 5, pág. 107. Faça um programa 
para traçar uma reta em diagonal, indo 
do canto inferior esquerdo ao canto su- 
perior direito datela (atenção: este pro- 
grama tem apenas três linhas!) 


Solução: 


IG FOR I=0 TO 40 
20PLOTLI 
30NEXTI 


Exercício 6, pág. 107. Modifique o pro- 
grama que desenha pontinhos ao acaso 
na tela para pedir ao usuário os limites 
inferior, superior, direito e esquerdo de 
um retângulo natela, dentro do qual se- 
rão jogados os pontinhos. 


Solução: 


10RANDOM 

15 FOR I=1 TO 100 v 
20LET X=INT(RND*30) +1 
30LET Y=INT(RND*20)+1 
4OPRINT AT YX;"” 
SONEXTI 
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RESPOSTAS AO TESTE ANTERIOR 


Teste 3, pág. 98. Escreva um programa 
para realizar a seguinte tarefa: um clube 
de aficionados de microcomputadores 
deseja fazer uma lista detodos os seus só- 
cios, na qual conste a idade de cada um 
eamarca domicrocomputador que pos- 
sui. O programa, depois de entrados os 
dados, informará: 

- o número de sócios que têm micro- 

computadores marca TK-85; 


Solução: 


MWREM-E- = SO 
20REM CADASTRO DO CLUBE 


30REM PARA TK-85 
40 


60 DIM NOMES(20,20) 
70 DIM IDADE(20) 


80 DIM E AZ) 


90 LET SOCIOS = 
100 REM 


- o número de sócios que têm micro- 
computadores marca Apple; 

- onúmero de sócios que têm outros ti- 
pos de microcomputador; 

- à idade média dos sócios do clube; 

- onome do sócio mais novo do clube. 


Utilize conjuntos unidimensionais 
chamados NOMES, IDADE e COMPU- 
TADORS$ para registrar os dados acima. 


110REM ***** ENTRADA DE DADOS ***** 


120 REM 


130 PRINT “ENTRADA DOS DADOS DOS SOCIOS”” 
140 PRINT “PARA TERMINAR DIGITE *” 


150PRINT, 
160CLS 


170 PRINT “SOCIO NO!;SOCIOS+1 
180 PRINT AT 21,0;"NOME DO SOCIO:” 


190 INPUT NOMES(SOCIOS + 1) 


2001F NOMES SOCIOS+1)="*" THEN GOTO 300 


210 LET SOCIOS=SOCIOS+1 


220 PRINT “IDADE DO SOCIO:?” 


230 INPUT IDADE(SOCIOS) 


* 240 PRINT “COMPUTADOR QUE TEM: 
250 INPUT COMPUTADORS(SOCIOS) 


260GOTO 160 
270REM 


280 REM ***** O dd 


290 REM 

300 LET TK8B5= 0 

310LET APPLE= 0 

320 LET SOMA= 0 

330 LET MENOR =99 

340 FOR I=1 TO SOCIOS 


3501F COMPUTADORS(1)="TK-85" THEN LET TK85=TK85+1 
3601F COMPUTADORS(I)="APPLE" THEN LET APPLE=APPLE+1 
3701F IDADE(I) (MENOR THEN LET MENOR =1 

380 LET SOMA=SOMA +IDADE(I) 


390 NEXT I 
400 REM 


per FEM RESULTADOS *º*"* 


420R: 


430 PRINT “SOCIOS COM TK-85= 
440 PRINT “SOCIOS COM APPLE= 
450 PRINT "OUTROS COMPUT. 


460 PRINT 


“TKBS 
APPLE 


=". SOCIOS-APPLE-TK8S 


470 PRINT “IDADE MEDIA=":SOMA/SOCIOS 
480 PRINT “SOCIO CACULA=":NOMES(MENOR) 


490 STOP 
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